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VRAM 

Descubra os 
seus segredos 



QUALIDADE 
CARTA NA 
MTA 



PACLAND 
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Entre aplicativos e games 
fique com os dois na 

ECTRON 




A ECTRON coloca a sua disposicao, completa variedade de programas, 
incluindo games e aplicativos. 

O que a ECTRON quer e preencher seu tempo e todo o espaco de 
seu MSX, tanto nas horas de trabalho, como de lazer. 



SOFTWARE 

• DBase ferramenta profissional para manipulacao de banco de 
dados • SuperCalc: A mais famosa planilha de calculos (ambos 
com suporte tecnico e reposicao de versao) 

PERIFERICOS 

• Drive para MSX 5 1/4 e 3 1/2 • Video Station • Interface para 
Drive • Cartao de 80 colunas • Modem • Monitores de vi'deo 



ECTRON ELETRONICA LTDA. 

Rua Dr. Cesar, 131 -Metro Santana-Sao Paulo- SP 
Tel.: (011) 290-7266 



JOGOS 

Temos a colecao completa, inclusive os ultimos langamentos. 
Temos ainda uma infinidade de aplicativos, os mais potentes do 
mercado. 

FITAS DE VIDEO 

Na ECTRON voce encontra o ultimo lancamento "MPO" em video 
cassete: "Cursode Basic MSX". Acompanha livro"DominandooMSX" 
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Integrando 

Clipper 

com linguagem C 



L.ste livro des- 
t i n a - s e a 
usuarios que 
desejam en- 
tegrar os recur- 
sos de CLIPPER 
com a utilizacao 
da linguagem C. 

O texto con- 
tern todo o 
processo de in- 

tegracao das rolinas escritas em 
C, com programas escritos em CLIP- 
PER. 



O autor apresenta tambem dicas e 
rotinas em C ja prontas, a titulo de 
exemplos. 





SOFTWARE 
^ LTDA. iir 



MSX - MSX -2 - MEGAROM 



INCRIVEL !'.! 



JOGOS MEGARONS 

DO MSX-1 QUE RODAM SEM 

CARTUCHO MEGARAM ! ! ! 



VAXOL 

MIRAI 

FINAL ZONE 

SUPER LAYDOCK 



(DISCO 51/4 INCLUSO) 

CADA:30BTNs 

PEQA CATALOGO "GRATIS" OU 

VISITE NOSSO SHOW ROOM 

RuaClelia. 1837 -Lapa 

Cx. Postal 11.844 -CEP. 05042 

Tel. (011) 65-2030 -SP 

Agora tambem aos sa'bados 
das 9:30 as 16:00 hs. 



Colecoes dejogos 

A Energy preparou para os usua- 
rios que gostam de jogos a mais com- 
pleta relacao para os micros da linha 
MSX. Sao mais de 70 colecoes com 6 
jogos, manual, gravacao profissional 
e garantiade 60 dias. 

Os usuarios de MSX 2.0 tambem en- 
contram na Energy mais de 20 jogos 
especiais alem de aplicativos. 

O endereco da Energy e caixa postal 
18686 — 04699 — Sao Paulo — SP — 
Tel.: 011-240-1383. 



u. 



Programando 

em 
Lingugem C 

Kenneth Pugh 




para iniciantes e 
contem informa- 



'm dos livros 
mais simples e 
praticos para se 
entender e 
programar em 
linguagem C. 

Um verdadeiro 
ABC de pro- 
gramacao em C. 
Pela sua sim- 
plicidade e de 
facil entendimento 
ao mesmo tempo 
coes preciosas para programadores 
experientes. 

O autor facilita, ainda, a transigao 
das linguagens Basic, Fortran, Cobol, 
PL/I e Pascal para a lingugem C. 



Discovery Informatica 

A Discovery assinou, recentemen- 
te, contrato com Alexandre Cruz, um 



dos melhores programadores na- 
cionais. 

O primeiro lancamento sera um 
programa para a confeccao de pa- 
ginas graficas, em tamanho poster. O 
programa toi totalmente desenvol- 
vido em Pascal e apresenta excelente 
desempenho e rapidez. 

Os usuarios dos micros DD Plus 
tambem ja poderao encontrar na Dis- 
covery uma serie de jogos adaptados 
e que carregam perfeitamente. 



Maxi Dados 

O Maxi Dados e um dos mais 
praticos bancos de dados do mer- 
cado. 

Todas as suas opcoes sao aces- 
sadas por menu e seu formato em car- 
tucho possibilita usar mais de 50 Kb 
da memoria. 

E possivel especificar o tipo de 
dado que cada campo ira receber, 
evitando erros de digitagao. A or- 
denaqao e feita em memdria, atraves 
de uma rotina em linguagem de 
maquina, sendo extremamente ra- 
pida. 

Qs arquivos podem ser gravados 
em fita ou disco e a impressao de 
relatorios ou etiquetas tambem pode 
ser feita, podendo se definir quais os 
registros deverao ser impressos. 
bem como os campos e formatos 
desejados. 

Maiores informacoes poderao ser 
obtidas na Orionsoft, atraves do 
teletone 011-881-9204. 



Manual Autocad 
para 
Desenho Mecanico 

Donald D.Voisinet 



C/ autor 
apresenta os 
comandos e as 
caracteristicas 
do AUTOCAD de 
maneira pratica, 
I6gica e clara, 
t a n t o para 
usuarios leigos 
quanto para os 
avancados. 



Manual 

AUTOCAD 

nam 
OMwnlKi MKftnlca 

aDMyauMmt 



O texto e disposto em uma sequen- 
cia progressiva que proporcionara ao 
usuario urn aprendizado melhor em 
curto periodo de tempo. 



Os conceitos de CAD apresentados 
no livro estao aplicados a urn de- 
senho pratico e real gerado por CAD. 



Nashua lanca Disquetes com 
vacina antivirus de computador 




Durante os meses de fevereiro e 
marco, a Nashua do Brasil estara dis- 
tribuindo gratuitamente — junto com 
a caixa do modelo 5 1/4 — disquetes 
com programa especial antivirus de 
computador. 



Datamak Eletronica 

A Datamak reune, em seu labo- 
ratory, os mais modernos softwares 
para diagnostico, instrumentos de 
analise e aferigao, bem como pegas 
para back-up e tecnicos altamente 
qualificados para Ihe proporcionar 
maior seguranga e confiabilidade no 
atendimento de equipamentos na- 
cionais e estrangeiros. 

O telefone da Datamak e 021-233- 
4796. 



O software tern capacidade de 
reconhecer 42 tipos principals de 
virus e muitos subtipos encontrados 
em PC e microcomputadores, alem 
de examinar cada programa carre- 
gado na memdria bloqueando a 
execugao dos programas contami- 
nados. 

Com esta inovagao, que vai revo- 
lucionar o mercado, a Nashua preten- 
de satisfazer as necessidades dos 
usuarios de seus disquetes com uma 
arma eficiente contra o virus do com- 
putador, que se tornou o inimigo 
niimero urn dos operadores de mi- 
cros e PC. 

Segundo o Gerente de Divisao de 
Disquetes da Nashua, J. J. Browne, 
"oferecer urn brinde de muita utili- 
dade ao usuario sem nenhum custo 
adicional, representa uma estrategia 
de marketing consonante com a alta 
qualidade do produlo e com a garan- 
tia por tempo ilimitado oferecido pela 
Nashua — unica no mercado de dis- 
quetes — confirma a total confianga 
que temos em fazertal langamento". 

Em praticamente urn ano, a Nashua 
conquistou 30% do mercado de dis- 
quetes com os modelos 51/4, 51/4 H. 
D. e 3 1/2 que s3o comercializados 
atraves de distribuidores, reven- 
dedores, magazines e lojas espe- 
cializadas em todo o pais. 

A Nashua iniciou suas atividades 
diretas no Brasil em 1971. Sua fabrica 
foi inaugurada em 1981 em Campo 
Grande, Rio de Janeiro, e a empresa 
tern hoje cerca de 500 funcionarios e 
filiais no Rio de Janeiro, S3o Paulo, 
Porto Alegree Recife. 



EVS Informatica 

Os paulistanos ja podem contar 
pom mais uma Softhouse, a EVS In- 
formatica que comercializa jogos, 
aplicativos, Hardware e tudo mais 
que um usuario de MSX necessita. 

A EVS fica na Rua Aleixo Jorge 171 
— Pompeia — Sao Paulo — SP — 
Tel.: 011-872-3466 




DA ELETRONICA 
PARA A INFORMATICA 



Minhas alividades no drea de in- 
formdtica comecaram h6 10 
anos, quando terminei o curso 
de Eletronica na Escola Tecnica Federal 
e precisova estagiar, durante 6 meses, 
em algum lugar, Por forca do destino, 
acabei na Gradiente, como auxiliar tec- 
nico. Tenho, hoje, um carinho muito 
grande por esla empresa e nunca dis- 
penso um elogio para os seus produtos, 
que sco de dtima qualidade, tanto por 
fora quanlo por dentro. 

A inform6tica veio atraves do estdgio 
complementar. Desta vez, haviam me 
jogado para o CPD da Prefeitura de 
Manaus. L6 foi minha escola: de esta- 
gidrio passei para conferente/perfu- 
rador. para operador (IBM SYSTEM/3), 
para progromador (RPGII j6 exinta, 
COBOL), e, finalmente, para analista de 
sistema. trabalhando com um IBM 4331. 
Por ser usudrio de mdquina IBM, five o 
privilegio de (azer, na IBM-Rio, todos os 
cursos que formam um progromador em 
analista. A esta altura, a eletronica, para 
mim. era hobby. Comecei a me apai 
xonar pela informdtica, talvez porque 
sempre fui apaixonado pelo desco 
nhecido. 



DO COMPUTADOR DE GRANDE 
PORTE PARA MSX 

No inicio de 85, resolvi comprar um 
micro para usar em caso sem nenhuma 
pretensdo: adquiri o CP-400daProl6gica. 
Percebi que, apesar de ser o que eu era. 
mal sabia ligar o micro. Notava a grande 
diferenca entre dois mundos: o Micro e o 
Main-Frame. Aprendi, por conta, o 
BASIC e, no final de '85, vendi meu 
TRS COLOR e comprei o EXPERT 
da GRADIENTE. Ainda no CPD da 
Prefeitura, depois de passado como 
progromalista pela SANYO, SOUZA AR 
NAUD, etc., recebi uma chamada do en 
tao Prefeito de Manous, Dr. Manoel 
Ribeiro, para desenvolver programas 
porticulares num micro que havia ga- 
nho. Adivinhe qual era o micro? Exa- 



tamente. Um MSX igual ao que eu tinha 
em casa. O Prefeito duvidou do micro e 
perguntou me se um PC nao seria 
melhor. Disse, naquele instante, que, o 
que nds tlnhamos era suficiente, e 
iniciei meus trabalhos. Pedi licenca do 
CPD para atender o Prefeito e, a partir 
dal, me inclinei para os micros, deixan 
do de lado o ICCF, VSAM, ISAM no lugar 
do BASIC MSX, ASSEMBLER Z 80. MS- 
DOS, UNIX, etc... 



CONTROLADORA DE DRIVE 

Em 86, o primeiro grande obstdculo 
que encontrei era a falta da controla 
dora do drive. A Gradiente, com o Ian 
^amento do EXPERT, passava por mo- 
mentosdificeisde burocracia em relacao 
a SEI e a SUFRAMA (Orgdo de Superin 
tendencia da Zona Franco de Manaus), 
mas nds precisdvamos urgentemente de 
uma controladora para inicior os tra- 
balhos. Foi quando surgiu um pequeno 
raio de esperanca vindo do nordeste, 
chamodo MICROSOL. Em Forlaleza, fiz 
diversos contatos com a diretorio da 
Microsol, trazendo a Manaus o primeiro 
drive/controladora, n° serie 860003 (5 
1/4 FS). Naquela epoca, a Microsol ou a 
importacdo eram a unica saida. A 
Gradiente, que fizera previsdo de lan- 
comenlos de novos perifericos, estava 
sendo pressionada por todos os lados. e pe 
la SHARP, por deboixo dos ponos, pelo Ian 
camento ilegal do seu EXPERT ESPERTO. 
A Microsol, pelo seu pioneirismo, co 
ragem e determinacao, merece todos os 
elogios de nossa parte, mas os projetis 
tas daquela empresa foram infelizes em 
desenvolver uma controladora que fun 
ciona a partir de portas de I/O. Estas 
portas foram criadas para uma com 
patibiiizacdo virtual com o CP/M, mas 
que, segundo o manual HARDWARE 
SPECIFICATIONS release 5.0 — pdg. 31 
— de 14 de novembro de 1985 da Ml 
CROSOFT, os enderecos de I/O DO D7 
nao podem ser utilizodos, porque o 
PADRAO MSX prove o uso de multiplas 



controladoras de drive. Seguindo mais 
adiante, dizia: "Portanto, recomendamos 
o uso de enderecos na memdria". 

Hoje, os clones da Microsol se es 
palham por todo o Brasil. causando um 
grande estrago na producdo do software 
e na ignordncia das pessoas. As con- 
troladoras da SHARP (baseado no 
protdtipo da SONY), LEOPARD, GRA 
DIENTE e a do ADEMIR sao as unicas que 
se salvam deste mar de TPX, TAX, 
XXX etc. O pau deito e rola em cima da 
controladora da SHARP, onde na coluna 
do leitor de uma determinada revista, o 
leitor desabafa e indaga por que os 
progromas PROKIT, DIGITAL BOOK. 
NEMESIS ESQUARTEJADO, ROBOCOP, 
etc.. nao funcionam na sua controladora 
que custou too caro. 



DATASETONTEM 

As vezes, sinto me um tanto impoten 
te por morar tao longe do Brasil, onde 
tudo demora a chegor e e tao dificil de 
sair, onde ate o hordrio e atrasado. Mas 
foi esta impotencia que me deu dnimo 
para mudar esta situacdo, inverter o 
quadro e foi exatamente isto que eu fiz, 
apds terminada a missdo com o Sr. 
Prefeito. Em dez/87, na reoliza<;do da l a 
Feira de Informdtica de Manaus, faltan- 
do apenas 3 dias e sabendo do boicote 
do GRADIENTE, foi que eu criei sim 
bolicamente a DATASET INFORMATICA 
LTDA. Conseguindo 1/4 do espoto num 
stand emprestado, coloquei ali, no- 
queles dias, a minha decisdo de lutar 
pela sigla MSX, que me conduzia para o 
mundo dos micros. Fomos o unico seg 
mento, diante da VERBATIM, PRODAM, 
CCE, DISMAC, SCOPUS, MICROTEC, etc.. 
a representor o padrdo MSX no mercado 
brasileiro. Naqueles dias, atraves de um 
RS 232 da SHARP, fizemos a primeiro 
ligaqoo MSX PC atraves de modem. 
Sucesso tdo grande que decidimos criar 
um CBBS local. As novidades tambem 
eram: o cartdo de 80 colunas e a expan 
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sao de 64 Kbytes do SHARP. A Gradiente 
nos cedeu 3 Experts c/monitores mo 
nocromdticos. O stand ficou bonito e (oi 
um verdadeiro sucesso e as imagens 
deste episddio eu guardo com carinho, 
em cosa, numa fita VHS. A feira foi 
como um furacao e n6s nao tinhamos es 
trutura para tanto sucesso. Todos 
queriam ir d DATASET comprar expan 
sao. cartao de 80 colunas. RS-232, que 
eu havia conseguido a titulo de demons 
tracao. Esperamos as coisas se acal 
marem e. depois de 1 ano de batalha. 
fizemos tinalmente a abertura legal da 
firma com inslalacao llsica prdpria, 
locali7ada no centro; reinstalacao da 
rede eletrica para os micros; telefone, 
fax, ar condicionados, pintura nova, 
mdveis, etc. Nossas metas: 

a) assessoria e prestacao de servicos; 

b) desenvolvimento de programas p/ 
PC/MSX; 

c) servicos de bureau em PC/MSX; 

d) prolissionalizar os MSX, mostrar a 
potencia deste micro para os profis 
sionais liberals, que sempre foi tratado 
como um video game de luxo, por culpa 
do marketing da GRADIENTE. 

DATASET HOJE 

Hoje. a DATASET ainda nao tern 1 ano, 
mas jd tern seu espaco definido em 
Manaus, Atualmente, ainda estou no 
CPD da Prefeitura, otuando mais como um 
administrador do que como um tecnico, 
tendo liberdade de ir quando e a hora 
que quiser ou quando precisarem. 
Tenho um socio, amigo daquela epoca 
do /3 da IBM, que se chomo Arnaldo, en 
genheiro e programador. Apesor da 
sociedade, a prestacao de servicos e in 
dependente em tudo. Somos 2 profis 
sionais com as mesmas caracteristicas. 
Devido ao meu colega ser engenheiro, 
nos inclinamos um pouco para a cons 
trucao civil. Temos desenvolvido em 
CLIPPER um orcamento de obras inte 



grado c/cronograma, controle de cus 
tos, contos a pagar. folha de pagamen- 
to. contabilidade padrao, estoque, etc. 
As empresas que atualmente estao com 
seus contratos (6 meses) a'ivos sdo: SER 
VAZ S/A SANEAMENTO E DRAGAGEM 
(Matriz em S. Paulo, onde n6s implan 
tamos o orcamento de obra), CONS- 
TRUTORA CAPITAL LTDA.. CONSTRU 
TORA SETENTRIONAL E REDE DE LOJAS 
INFANTIS PINGO DE GENTE. No campo 
MSX, desenvolvemos um controle ban- 
cdrio multiusudrio que eu batizei de 
CBMU (cuja distribuicao estd sendo ne 
gociada com o Sr. MARCOS da MPO/SP), 
controle de estoque p/loja c/ate 6 fi- 
liais, orcamento de obras baseado no 
projeto que desenvolvemos no PC, con 
trole de patrimonio e um controle odon- 
toldgico. Este ultimo, desenvolvido 
durante mais de 6 meses, tomando por 
base informacoes de dois profissionais 
na drea: Dr. C. V. Padilha (Odontdlogo) 
e Dr. Sergio (Professor de Odontologia 
na Universidade do Amazonas). Este sis 
tema, agora, passo por uma reforma 
geral, porque estd sendo convertido 
para MSX2, aproveitando-se dos recur- 
sos grdficos da mdquina. 

Todos estes programas foram desen 
volvidos especificamente para atender 
um determinado tipo de cliente e agora 
estao passando por uma reprogramacao 
generolizada com instalador inteligente. 
Em programacao: SISTEMA DO AD 
VOGADO, que estd sendo desenvolvido 
juntamente com dois advogados, meu ir 
moo e o sdcio dele. Em forma de bureau 
atendemos o SINDICATO DA CONS 
TRUCAO CIVIL DO AMAZONAS, no qual 
temos desenvolvido um sistema cha 
mado C.U.B., que calcula o Indice do cus- 
to unitdrio bdsico, em padroes da cons- 
trucao civil: HI, H4, H8 e H12. O sistema 
processa informacoes de ate 10 em- 
presas e emite mensalmente diversos 
relatdrios estatlsticos, que sao enviados 
a Brasilia, para a Fundacoo Getulio Var 
gas, atraves do Sindicato local, para que 
seja calculado o C.U.B. de todo o Brasil. 



E isto e feito num MSX! Talvez, todos os 
outros Estados brasileiros se utilizem de 
um PC ou algo mais exagerado. 

A venda de software importado fico a 
cargo do minha esposa, jd que eu e meu 
sdcio passamos a maior parte do tempo 
fora (em campo) prestando servico e 
desenvolvendo programas PC, na 
prdpria empresa que nos contrata. No 
final das tardes ate d noite, sdbados, 
domingos e feriados nos encontramos 
na DATASET (quartel general) e mer 
gulhamos no MSX. 

DATASET AMANHA 



A DATASET se projetou tambem no 
hardware. Vendemos, durante algum 
tempo, Disk-Drives de 3 1/2", disquetes 
MAXELL 3 1/2, impressoras, Disk 
cleaning 3 1/2", colocacao de drives c/ 
controladora no EXPERT, etc. Todos es 
tes materiais eram comprados na ZFM. 
dos importadores. Decidimos ser impor 
tadores pora baratear o custo e ter livre 
escolha. Para isto, nos recadastramos 
junto a SUFRAMA, para adquirir cota de 
importacao para o ano que vem. Por cer- 
ta influencio, e possivel que consigamos 
uma cota de ate 80 mil ddlares para im 
portacao. Desde entao, venho tentando 
contato com exportadores, atraves de 
amigos meus, para adquirir catdlogos 
de MSX/PERIFERICOS para importacao 
e venda no Brasil, atraves da ZFM. 
Imagine todos nds podermos ter em 
casa um MSX2+ com nolo fiscal, ou uma 
expansao de 512Kb memory mapper, ou 
uma controladora de disco rigido, ou um 
MSX ligado a um monitor MULTSYNC II, 
da Nee, e tudo isso legalizado! E e pos 
sivel, porque, vindo a Manaus, vocd tern 
direito de comprar e levar ate $1,400 
incluindo produtos de informdtica, 
sem equivalencia nacional, como e o 
caso do MSX2 ou MSX2 + . Atualmente. 
nas lojas da ZFM, sao vendidos, livre 
mente, para quern quiser, MAC PLUS, 



MAN I AC OS 
DO MSX 

SOFT - 2.500 tltulos de jogos e aplicativos 

HARD - HOT-BIT EXPERT novos e usados, impressoras, drives. 

monitores e muito mais. 

SUPRIMENTOS - FormulSrios. disquetes. fitas K-7 e fitas para 

impressoras. 

SERVICOS - Alinhamento e manutencao de drives, assistSncia 

t6cnica para micros e impressoras de qualquer marca. 

PROMOCAO V Pacote 100 jogos (escolher) NCz$ OFERTAO 
2) Pacote 200 jogos (escolher) NCz$ OFERTAO 

TALL COMUNICACOES LTDA 

MATRIZ; Av. Jabaquara 99 sala 54/5 e andar Vila Mariana - SP - CEP: 04050 
Tel: 01 1/276.7465 - enlre as estacOes da Pea da Arvore e Santa Cruz do Metro 
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PS/2 modelos 30/40, LAPTOPs, impres 
soro 6 LASER, EPSON FX 1050. PA 
NASONIC KX, monitores SANSUNG e 
MULTSYNC e diversos perifericos. Mas 
para o MSX nfio h6 nada, exceto os 
drives de 3 1/2 dos PCs que podem ser 
utilizados no MSX. Eis o problema: a 
maioria das imporlacoes vem dos Es 
tados Unidos e Panamd, e, atraves de 
diversos conlatos com exportodores que 
conheco, recebi resposta negative quan 
lo a existencia de MSX nesses poises A 
difiruldade e tanta que, para comprar o 
nosso MSX2+ no Japao, atraves de um 
amigo que pora 16 viojou, foi preciso que 
eie confiasse o dinheiro o um japones 
para ir comprar na lojo. O vendedor se 
negava a vender ao meu amigo. dizen- 
do: — Only japoneses. Hoje, o micro es 
16 aqui ligado o um Telefunken AVM 
Stereo com RGB de t6brica, luncionondo 
a todo vapor. 

BOAS-NOVAS 

Temos um laco de amizode muito 
grande com o diretor residente e tec 
nicos da Gradiente e pessoal da Su- 
Irama. Posso odiantar alguns dados 
sobre a Gradiente que ainda, talvez. 
nao sejom de conhecimento publico e 
que sao curiosos. 

1°) A SUFRAMA liberou guia de impor 
tocao para 50.000 drives de 3 1/2", mas 
ela so importou inicialmente 10.000. 
2°) Ao montar a linha piloto do DD PLUS. 



a moiorio dos drives, aleator iamente, 
davam mensagens de 1/0 Error. Os 
projetistas haviam cometido um engano 
na controladora: um capacitor no lugor 
de um trimpot. que nao poderia ser 
reajustado. Ocorreu atraso de lanca 
mento devido a este lato. 
3°) A Gradiente, apesar de ler com 
prado a Telefunken, o partir de janei- 
ro/90 abandonar6 este nome, passando 
os televisores a terem a marca GRA 
DIENTE. 

4°) Os novos EXPERTS vem com a RAM 
no slot 3 3, como os importados. Mas a 
maioria (90°i) dos boot's dos joguinhos 
nao fazem procuro de RAM em slot 
secunddrio. Conclusao: CRASH ! ! ! 
5°) Os drives de 3 1/2", embutidos no 
DD PLUS, s6o os famosos E Y DATA, os 
mesmos usados nos micros PS/2 da IBM. 
6°) Para baratear o custo dos micros, a 
Gradiente importou o chipao' econo 
mico da Toshiba, utilizado nos modelos 
HX20 HX22. Isso deve trazer um serio 
translorno pora o Ademir. 
7°) A Gradiente comprou a licenco do 
logotipo MSX2 + ROM + SUB ROM. da 
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MITSUBISHI 
anos. 

8°) J6 h6 uma programacao de datas 
para o loncomento do MSX2, da Gradien 
te: Maio/90 prototipo. Seteinbro 90 
linha piloto, Novembro/90 em produ 
cao. Os projetistas convenceram com 
um simples argumento: tiramos de linha 
o Cartao de 80 cols, economizando 
placas, gabinetes pl6sticos, componen 



tes, etc., e o colocamos dentro da CPU. 
O atual cartao de 80 cols., da Gradiente, 
traz o coracdo do MSX2: o chip V 9938. 
da YAMAHA. 

9°) A coisa parece seria mesmo. A 
Gradiente enviou ao Japao alguns tec 
nicos da GRATEC, e eles retornaram 
trazendo diversos modelos MSX2. pe 
rifericos e manuais tecnicos da ASCII 
japoness, em ingles, sobre o podroo MSX2. 
Inclusive, um dos manuais, o MSX2 
TECHNICAL DATA BOOK de 400 pags, eu 
xeroquei e mandei de presente para o 
Ademir. 

10°) A ultima informacao que obtive 
atraves do pessoal da GRATEC, e o 
melhor de todas: a ASCII \a est6 com o 
MSX3 (Terceira Geracao) no torno. A 
PANASONIC desenvolveu um chip recon 
figurdvel ou chip de 2 caras, de 64 bits, 
que tomard o lugor do veterano Z 80, (a 
mesma coisa aconteceu com o proces 
sador de video, o V9938 MSX2. da, 
YAMAHA, que tern dentro de si, o an 
tigo TMS 9128 MSX1). A velocidade de 
processamento do MSX3, em cargo 
mdxima, atingir6 a mesma velocidade 
de um AT 286, da IBM. A compatibili 
dade, a nivel de programa, entre um PC 
e um MSX se tornar6 realidade! Pre 
visao de lancamento: Novembro de 
1990. 

Quero completar dizendo que todas 
as informacoes acima citadas sao extra 
oficiais e que so o futuro poderd dizer se 
sao VERDADEIRAS. Como vivemos no 
Brasil, tudo e possivel. 



MultiModem TELCOM 



Acbbbo garantido ao STM-400, 
VIDEOTEXTQ, clubesde micro 
(CBBS). Possui a maior blbllo- 
teca de programaa para AASX. 



RECOMENDADO PELA EMBRATEL. 
E ATENDIMENTO AUTOMATICOS. 
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ENTENDENDO A VRAM 



PAULO MARQUES FICUEIRA 



Vamos compreender, agora, um pouco da estrutura da 
mem6ria de video (VRAM) dos micros MSX. a fim de aprender- 
mos alguns truques muito interessantes. 

Nosso MSX (o da versao 1) possui uma memdria de video de 
16 Kb. Esta memdria e independente da RAM normal que estd 
disponlvel paro os programas. Sabemos que o nosso MSX pos- 
sui quatro modos.de video, sendo a screen e 1 para os modos 
de texto e screen 2 e 3 para os grdficos. Observe o mapa da 
VRAM que segue abaixo no parte da screen 0: 



MAPA DA VRAM — MSX 1 .0 



END 





959 

2947 
2048 

4095 

6144 

6911 
6912 

7039 
8192 
8223 



14335 
14336 



16383 



SCREEN 



NOMESO 



PADROES 2 



SCREEN 1 



PADROES7 



NOMES 5 



ATRSPRIT 
8 



CORES 6 



PADROES 
SPRITES 
9 



SCREEN 2 



PADROES 
12 



NOMES 10 



ATRSPRIT 
13 



CORES 
11 



PADROES 
SPRITES 
14 



SCREEN3 



PADROES 
17 



NOMES 15 



ATRSPRIT 
18 



PADROES 
SPRITES 
19 



Sabemos que se trata da tela de texto em 40 colunas e po 
demos observer duas tabelas na VRAM: 

— Tabela de nomes 6rea de video real. Digamos que esta 
seja como uma janela para o seu video. Tudo o que cair nessa 
drea surgird na tela. Como temos 24 linhas e 40 colunas e 
precisamos de um byte para cada caracter, temos 24 x 40 = 
960 bytes. Por exemplo. para colocar a letra "A" na segunda 
linha e decima coluna, entao devemos fazer: VPOKE 2*40 + 
10.65, onde: 

VPOKE — coloca uma informocao na memdria de video 
2*40+10 — calcula oenderecoda VRAM (linha 2, coluna 10) 
65 — codigo para a letra "A" 

— Tabela de padroes nesta tabela temos o formato de cada 
letra que o micro pode usar. Para cada caracter usamos 8 bytes 
para indicar o seu formato. que estd em bindrio, de forma que 
o bit 1 representa o ponto aceso na tela e o bit em representa 
o ponto apagado. 

Digite o programa abaixo e observe: 

10 SCREEN 

20 FOR A = 2048 TO 4095 

30 PRINT RIGHT$(("00000000" + BIN$ (VPEEK (A))) % ) 

40 NEXT A 

O que nos interessa aqui sao apenas estas duas dreas de 
memona. O resto estd vazio (na screen 0). Al podemos colocar 
vdrias outras telas e ate mesmo gerar imagens quadro a 
quadro, como veremos mais adiante. 

No Basic MSX existe uma varidvel interna chamada BASE. 
Como uma varidvel indexada, ela guarda o endereco da VRAM 
onde estao as tabelas que nos interessam. Por exemplo, paro 
saber qual o endereco da tabela de caracteres (padroes) na 
screen fata: 
PRINT BASE (2) 

O programa abaixo, feito para a screen 1, criard uma nova 
tabela de caracteres no seu micro, porem nao vai alterar a 
original, fazendo com que voce fique com dois tiDOS de letras: 

10SCREEN0 

20 FOR I = TO 2047: W = VPEEK (I) 

30 VPOKE 1 + 2048. W OR (W/2) + (W/4) 

40 NEXT 

Voce n5o notard diferenca de imediato, pois a nova tabela 
de padroes foi criada em outra drea da VRAM. Assim, para 
trocar de caracteres digite: BASE (7) ■ 2048. 

Com isso, voce mudou o endereco da tabela de padroes para 
2048, onde estd a nova tabela. Para voltar ao normal, digite 
BASE (7) = 0. Perceba os vdrios recursos que isto pode nos 
oferecer. 
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SOFTWARE 
EM DISKETTE 



MSHfflMD3A 

MSX 



Of 'F<-0 

HOT BIT 
EXPERT 




APOJO: 



i*mm 



CtBERTRDn 



MAXIDADOS 

O mais completo e sofisticado Banco de Dados em 
cartucho para a Linha MSX. Permite seu uso em 
equipamentos que tenham sua memoria 
ampliada ate 1 MBYTE DE RAM. 
Opera com K7 on Diskete. 

MSX-WORD 3.0 

Poderoso processador de textos destinado ao uso 

domestico ou profissional, 

permitindo armazenamento de ate 480 linhas. 

Inclui busca de palavras, movimentacao de blocos, 

reformulacao de paragrafos, 

blocagem, definicao de margens, etc. 

MEGA ASSEMBLER 

Permite a criacao, edicao e copia de 

cartuchos para MSX. Podem ser criados programas 

em Assembler, incluindo graficos e 

tabelas de caracteres. 

Opcao de acesso a qualquer SLOT do MSX. 



OUTROS APLICATIVOS 
ClfJFRTRON 
Diskete: Planilha 2.0 

• Conlrole de Estoque 
Fita K7: MSX WORD 

• Assembler 

e Desassembler 

• Planilha de MSX 

• Banco de Dados. 



Rua Conselheiro Saraiva, 838 - Santana 

CEP 02037 - Sao Paulo - Capital 

Telefone (011) 298-3299 

REVENDAS: 

Mesbla • Mappin • Filcril Sao Jose dos Campos - SP: Igres Infor. Tel. 
RJ: Riosoft - Tel.; (021) 264-3726 RS: S| - Infor. - Tel : (0532) 25-9906 • 



(0123)21-0321 

Prologos - Tel : (0512) 22-5803 




Alente, agora, para os varidveis do sistema na tabela 
abaixo: 



CONTEUDO 


SCREENO 
END. 


SCREEN1 
END. 


SCREEN2 
END. 


SCREEN3 
END. 


END. TABELA DE NOMES 


F3B3 


F3BD 


F3C7 


F3D1 


TABELA DE CORES 




F3BF 


F3C9 




PADROESDECARACTERES F3B7 


F3C1 


F3CB 


F3D5 


ATRIBUTOS DOS SPRITES 




F3C3 


F3CD 


F3D7 


PADROES DOS SPRITES 




F3C5 


F3CF 


F3D9 



Quando mudamos os enderecos da VRAM atravds da va- 
ridvel BASE(). na verdade, estamos apenas, mudando estes en 
derecos de memdria onde o VDP ird ler as informacdes e mos- 
frar no video. Mas para que possamos realmente Irabalhor 
noulra drea da VRAM, e necessdrio o comando SCREEN, que 
fard uma mudanca complete. 

Logo, devemos modificar estes enderecos utilizando BASE () 
e depois SCREEN. Podemos, com isso, ter vdrias telas mon 
tadas na VRAM e trocd-las com uma velocidade incrivelmente 
alta. Hd apenas uma limitacao quanto a SCREEN 2, jd que esta 
ocupa quase todos os 16Kb da memdria de video. 

O programa da listagem 1 e urn bom exemplo deste proces 
so. Nele, vemos um cubo desenhado em tres quadros na 
SCREEN 3. Estes quadros vao sendo trocados um por um, dando 
a ilusoo de movimento. Note que, para desenharmos o cubo 



em outra drea de memdria, e necessdrio o uso dos comandos 
BASE e SCREEN, mas, para apenas exibirmos outras pdginas, 
basta usar BASE. 

A listagem 2 nos traz mais duas procedures para os pro 
gramadores em Pascal. Voce poderd inclul-los ds que foram 
publicadas em CPU numero 7 pdgina 25. Apenas note uma 
pequena mudanca feita na procedure screen. A procedure 
VPAGE faz uma mudanca em ate treze pdginas em screen e 
usa a procedure BASE. Para VPAGE devemos intormar o nu- 
mero da pdgina seguido do valor para apenas moslrar a 
pdgina ou 1 para realmente efetuar a mudanca, quando, en- 
tdo. a nova pdgina serd limpa. 

Usando este recurso na SCREEN 0, podemos armazenar aid 
treze telas cheias (cada uma possui apenas 960 bytes) na 
VRAM e exibi las mudando o endereco de BASE (0). criando 
rdpidas mudancas de video em seus programas. 

Por fim. nao se esqueca de levar em conta que: 

— IO endereco databeladenomesdevesermultiplodel024; 

— O endereco da tabela de caracteres deve ser multiplo de 
2048; 

— O endereco da tabela de cores deve ser multiplo de 64; 

— O endereco da tabela de atributos dos sprites deve ser mill 
liplode 128; 

— O endereco da tabela de padroes dos sprites deve ser mul 
tiplode2048. 

Esta 6 uma exigencia do processador de video e todos estes 
enderecos podem, tambem, comecor do zero. 

Espero. com isso, ter mostrado um pouco de mais um dos 
vdrios truques que se pode fazer com o VDP truques estes que, 
muitas vezes, estao bem d nossa frentedentrode um aplicativo 
ou um jogo, e nem sequer sao notados. Ate d prdxima. 
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Mf UDERES DE MERCADO 

(1 • Drives DDX 5 1/4e3 1/2 
Jj * Megaram Disk 
' Transformacao 2.0 
Impressora Lady 80 
- Modem p/MSX 
"*' * Jogos e Aplicativos 
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Drive DDX 5 I /4 720 Kb 
Winchester p/MSX 
(Informac.oes) 
TV Monitorizada 
c/alta definioao 
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UNHA CRADIENTE 

• Expert Plus 

• Expert DDPIus 

• Monitor de Video 

• Modem 

• Placa de 80 

• Datacorder 
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POl£COMP INfOflMRTICfl 

Av. Rio Branco, 156/3204 

Ed. Av. Central - (021) 240-7052 



IINFORMATICA/ 

Rua Senactor vergueiro, 207/1205 
Flamengo- (021) 552-4581 
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6 '# BERANDO trriros ij.i :;creen 3 * 

10 ''Programs •:.inifiii.: USD DA VRAM) * 
20 * "AUTOR: PAULO MARQUES I 1GUE1RA » 
30 " *l>.'. 1 A : 25 / 08/8? * 
40 '» REV I ST CPU 11 

11 "#*««#«**■**« 1 ....n,,.....|. 

50 OPEN"GRF : T "AS*1 

60 X = 70:r.OlOR 12. I: BASE (1/>=0:BASE( 15> = 

2o48: SCREEN3 

70 LINE (130, 10) (40,30) :LINE- (40,160) :L 

INE- (130, 180) :l INE (220. 160) :LINE- (220, 

30) :L.INi: -(!.:■>. 10> :LIME -(130, 1B0) SPAIN I ( 

120, 179), 2, 12:1 A1N1 (140, 1 70) ,7, 12 

n LINE(0, ISO) --(40, ISO), 12: LINE (220. 150 

l-(£55, 1S0):PA1NI (0. 190>,13, 12 

00 GOStJB2?i> 

90 COLOR 12, l:l'ASE(17l-4096:BASE(I5)-81 

'?2:SCKLEN3 

100 LlNE(40,3u> (40,16o):LINE (80,180): 
L INF- (220, 16'.') SLINE- (220,30) : LINE- (BO, 1 
O) : LINE -(BO, ISO): LINE <80, 10)- (40,30) : PA 
I NT (7C, 160), 2, 12: PAINT (140,1 70), 7, 12 

101 LINE (0,150) <4", ISO) , 12:LINE(2?0. 15 



0)--(255, ISO) 5PAINI (O, 190), 13, 12 I 

1 lO GOSUB 230 | 

120 COLOR 12, l:BASE(17)-10240:BASE(15)-i 
12288: SCREENS , 

130 LINE(40,3«')-(40, 160) : L INE- ( 180. 1BO) I 

M!NE-<220, 16o):line- (220,30) :line-<ibo: 

, lO) : LINE -(40, 30) :L INE (180. 10) -(180, 1801 
): PAINT (185, 170), 2, 12:PAINT,( 140, 1 70) , 7, ! 

12 I 

131 LINE (0,1501 -<40,150>,12:LINE(220,15I 
0) --(255. 150>:PAINT(0, 190), 13, 12 
140 GOSUB 230 
150 BASE(17)=0:aASE(15>-2048 

FORT" 1T0X: NEXT 

BASE(17)«40?6:BASE(15)-B192 

FORT-lTOX:NEXT 

BASE ( 1 7 ) - 1 0240 : BASE ( 1 5 ) = 1 2288 

FORT«=lTOX:NEXT 

I*-INKEY*: IFI«<>""THENCOLOR 15:END 

GOTO ISO 

loliir14:x*»"leia cpu" : forv="ltolen ( x i 
«) :pset(v»27-5, 100), point (v»27-5, 100) sp i 
rint#i.'mid*(>:'*,v,i):mext:colori2:returni 



160 
170 
ISO 
190 
200 
210 
?20 
230 



<»+ _. __ .. <M) 

(» I PROCEDURES DE PAGINACAO DE VIDEOI«' 

(MEM TURBO PASCAL - COMPLEMENTS DO ! N > 

(»IPACOTE GRAF I CO PUBL ICADO EM CPU!*' 

(•INUMERO 7 - POR PAULO M. FIGUEIRAI»> 
< #+ +# , 

PROCEDURE SCREEN ( X : B YTE ) I 
C I I »> 

( *c onmi ido- - -+ I «) 

(«mcidu cl* t»l« — + ») 



l-EGIN 



END I 



IF «X>3) THEN 
BEGIN 

INLINE <»F7/«00/«6C/«00) I 
WRITELNCERRO DE SCREEN')? 
HALT I 

END I 

CASE X OF 

: INLINE (*F7/*0O7»6C/*OO> I 

1 : INLINE (*F7/»00/*6F/*00> I 

2 : INLINE (»F7/*OO/*72/»00); 

3 : INLINE («F7/»00/*75/»00) I 

ENQI 



PROCEDURE BASE(Z:BYTE J X: INTEGER) f 

«« li : «> 

( "LOMANDO- -+ I I » ) 

<*NOM DA 6ASF h I ») 

(•ENDERECQ ♦ «) 

VAR Y:STRINGC33; 
W:9TRINOCAJl 



BEGIN 



STR(Z,V>| STR(X.W)| 

LUMP:-' l'+y**)« +CHR(«EF)-iW+CHR(0> I 



INLINE («21 /«00/»A0/*DD/«21 / 
*5A/*7B/«CD/»00/«C0) » 



LND( 



PROCEDURE VPAGE(X, Y:BYTE )t 

(* l«l I *> 

(•COMANDO ♦ "I I ») 

I »NUM DA PAGINA-+ I K) 
<»l=mudar O'moitrii + ») 

VAR SCREN: BYTE ABSOLUTE tFCAFS 
NOME3: INTEGER; 



BEU I N 



II SCREN>0 THEN 



BEGIN 

SCREEN (0)1 

MR1TELNC SCREEN ERR ADA ! ' ) I 

HALT! 
END) 
IF (X<0) OR (X>12) THEN 
BEGIN 

SCREEN (O) I 

WR1TELNCFAGINA MUITO ALTA' ) I 

HALT I 
END? 
• F (Y>1) THEN 
BEGIN 

SCREEN (0)1 

WRITELN ( ' ERRO DE PARAMETRO' ) ! 

MALT | 
END I 
IF X>-2 THEN X:-X*2l 
N0NES:-1024»X| 
BAGE(0,NOMES)l 
IF Y-l THEN SCREEN (0)| 



END* 
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TECNOLOGIA EM SOFTWARE NACIONAL. 



ItfSX FLOW CHART] 

par vrran hued p. cost* 

FttiBfcmanta □ primeira programa da Qrafiocts 
□□marcitaiB a aatatiaUcioB prof UMioruat para 

msiri. Tatatmanta daBanvnlvldn am UnguBgam 
Pascal, a programa pussui recurEDs pub o 
tcrnim am muitnBs casos, superior acts me- 
bk-ioras pragramos para J5 bits. 

Atgumaa caractariisticas da programs* 

*~1 tipaa da grafiDos (bie tri- dimansiDnais ) . 
•* f kjncoas matamaticaa dBfintaets. 

* raouraividada nm func&n matamaticas. 

* arguLuamanto da dados b formefciE. 

* antrada da dados ate JOB (tans . 
4 imprasEBD am bbobIb da Dinaas. 

* arquiVBRisnta da takas am carina formates. 

* apbioaoao oomarciat b oiantifica. 



EiiEfflPLD OE GRAFTED DE LJnHAS 



1 



Garros rasseia 
ULiliLarios 



UnidadES 



nedia n..B 
Diferenca n,B 
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EKEmPk-O DE GRftfJCD Em 3-D 



PUBLISHING 

DESKTOP 5URFRCE5 * 5UPERFfCIE5 PRRR RCR- 
BRMEWTD EM DESKTOP. NCZ* SVQ,DD 

BDRDERS US •+ NOVO CON JUNTO DE MOLDURR5 
COM FDRMRTD5 INEOITD5. NCZ* 370,00 

SUPER LETTERS #3 + 5EN5RCI0NRL CON JUNTO 
DE LETRR5 EM FDRMRTO 5MRPE. NCZ* 330,00 

RRT PRCK *B* FIGURR5 INCR1VEI5 E TDTRL- 
MENTE INEDITR5 PRRR DE5KTDP. NCZ* 370,00 

LETTERS #3* NOVO CON JUNTO DE FONTE5 INE- 
DITR5 E RCENTURDR5. NCZ* 330,00 

Estas paginas reran criadas com os seguintes pro- 
dutos: Super Letters *2, Desktop Surfaces, HSX Flow 
Chart, letters *2 e Graphos Pro. 
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100 

90 
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40 
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20 
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♦ RCDMPRNHR MRNURL CDMPLETD. 

■> DI5PDN1VEL EM 5 1/4 E 3 1/3 PDL5. 

♦ GRRRNTIR E 5UPDRTE PERMRNENTE5. 

♦ PRDGRRMR 1DD X NRCIONRL. 

♦ REGI5TRRDD NO I.N.P.I. 




COLDR 5HRPE3 * SEN3RCIONRI3 5HRPE5 COLO- 
RIDD3 PRRR RBERTURR5 CM VIDEO CR33ETE 
OU TELH3 DE JOGD3. NCZ* 330,00 

COLDR 3URFRCE3 * SUPERFICIES COLDRIDR5 
PRRR RCRBRMENTO EM VINHETR3 PRRR VIDEO 
CR33ETE, TELR3 DE JOGDS OU DURLQUER OU- 
TRO TRRBRLHO QUE NECE35ITE ERRNDE RPELD 
VI3URL. RCOMPRNHR MRNURL COM DICR3 PRRR 
r cowreccftD OE BONITR3 VINHETR3 PRRR VI- 
DEO CR33ETE. NCZ* 340,00 

RMIQR, O CDMPUTRDDR DR DECRDR » FITR DE 
VIDEO MD3TRRNDO TODR R POTENCIRLIDRDE 
DE3TE MICRO MRRRVILHD3D. OURLIDRDE PRO- 
FI33IONRL. FORMRTO VH3. NCZ* 7BD,OD 

Colecoes Desktop Put>l. & Pres. requeren Graphos 3 



MSX 





: ALEXANDRE CRUZ 



Poster 



Make r 



PRINCIRAIS 



* CRIRCflO DE PRGINRS EM MINUTD3. 

•+ CDMPRTfVEL CDM GRRPHD3 E PRBE MRKER. 
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Pod*roso prograMa para cadastro d* clientes COM 
Mala direta inteligente. EMite etiguetas CM »»0 oil 
80 colunas sew desperdicio d« papei. Fas procura 
por "string", per-Mite a separacao de clientes por 
classes, aleri de outras Punches praticas para 
gueM dcseja rapidez, praticidade e econoMia. Com 
Manual coMpleto de operacao. 
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R DISCOVERS' IMFORMRTICfi lane a com enclusividade 
o prograMa que revolucionara a confeccao d* pa- 
ginas graficas i o MSX POSTER MAKER. TotalMente 
desenuolvido eri linguageM Pascal, o prograMa ge- 
ra eri questao de Minutes, paginas que *m outros 
editores levari aMos horns para confeccionar. To- 
talMente coMpatiuel a nivel de shapes com o Gra- 
phos 3 e a nivel de paginas com o MSX Page Maker, 
do MesMo autor. Trabalhos realizados com outros 
editores, nao serao perdidos. R principal carac- 
teristica do prograMa * a confeccao de cartazes 
e posters de form* se-Melhante aos MundialMente 
faMosos PC Print Master e PC Print Shop para a 
linha 16 bits. O prograMa esta registrado no Ins- 
titute Macional da Propriedade Industrial CIMPIZi, 
tendo o prograMa, garantia « suport* pcrMan*nt*s 
para os usuarios cadastrados. 
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SCREEN 

TO 

DOS 

PDr LEDNRRDD BELTRRD 

Se voce * prograriador dBRSE e gostaria de sofis- 
ticar seus prograMas, ou se voce' gosta de MCHCr 
com o D.O.S e increMentar seus "RUTOEXEC.BRT", 
este prograMa lhe possibilita converter qualquer 
tela do Graphos 3 para o for-Mato .COM, possibili- 
tando UMa amp la gama de opeces. Rs telas rod an 
a par tir do D.O.S, siMplesriente digitando seu no- 
ne. RcoMpanha Manual coMpleto. 
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LEITURA E GRAVACAO 
DA VRAM 



MARCIO MACHADO MOURA 

Nemesis Informdfica 



Embora j6 existam rolinas prontos no BIOS, relerenles 6 
leitura e gravacao da VRAM, as mesmas nao apresenlam a per 
formance, em velocidade, desejada em muitos aplicacoes, on- 
de o tratamento de video necessita de alto desempenho. 
Veremos no artigo desle mes, como interagem os equipamenlos 
padrao MSX com o video, pois a compreensao deste mecanis 
mo nos possibilitard o detolhamento do uso direto das portas 
de enlrada e saido, associados aos microprocessadores, envoi 
vidos no gerenciamento do video: O Z80. e o VDP. 

MEM6RIA DE ViDEO 

Embora seja fato que o periferico video seja um periferico de 
saida, temos uma situacao diferenle, em se tralando de 
equipamentos de lecnologia mais alual, como no caso dos 
microcompuladores padrao MSX. Neste tipo de arquilelura. 
lemos um microprocessador dedicado apenas ao tratamento 
de video, que. atroves de um programa especial, administra 
uma memoria RAM (de 16 Kb nos modelos MSX 1 .0), diretamen 
te associada ao video. Esto associacoo foz com que o video fun 
cione como uma especie de espelho desta memoria, sendo im 
possivel a gravacao em determinadas dreas de memoria sem o 
reflexo direto desta gravacao no video. Sendo assim, e pos 
sivel ler o que aparece no video, pois esta aparicao e apenas 
uma codiiicacao dos dados contidos em uma memdria RAM 
possibilitando a recuperacdo destes dados, que, aos nossos 
olhos. tormam imagens no video. 

Um detalhe importantissimo na compreensao da memoria de 
video, denominada de VRAM, relere se a sua divisao em 
dreas, que cumprem luncoes dedicadas a formacao de imagens no 
video: 

1) area de formacao de caracteres; 

2) Area de aparicAo de caracteres; 

3) area de cores dos caracteres; 

4) area de formacao de sprites: 

5) area de locauzacao de sprites. 

Considerando o objelivo de comunicacoo com o usudrio que 
o periferico video requer. temos como area base, a AREA DE 
FORMACAO DE CARACTERES, onde existe o desenho de todos 
os simbolos e letras da tabela ASCII. Como veremos no decor- 
rer do artigo, isto nao impede que tenhamos apenas desenhos 
sem a presence de nenhum caracter na tela. 

A AREA DE APARICAO DE CARACTERES e realmente a parte 
mais associada ao video, pois, quando gravamos um cddigo 
ASCII nesta drea, a imagem dele serd lida, da AREA de FOR 
MACAO DE CARACTERES, e o desenho do caracter aparecerd 
imediatamente na tela. E bom observar que a relacao de 
posicao entre a drea e o video e linear. Isto significa que nao 
existem linhas e colunos na geracoo de imagens, sendo apenas 
simuladas por software nas vdrios aplicacoes que necessitam 



deste lipo de referencial. Na realidade, temos que considerar 
que o byte seguinte ao ultimo byte de uma linho, e o primeiro 
byte da linha abaixo, e assim sucessivamente. ate o fim da 
tela. Por isso, a gravacao sequencial na AREA DE APARICAO 
DE CARACTERES, obriga a apancao dos desenhos dos 
caracteres no video, pulando de linha (na imagem vista na 
tela), sempre que a quantidade de bytes de uma linha se es 
goto. 

A terceira drea refere-se as cores que serao usadas no 
desenho dos caracteres. Como soo usadas duas cores para 
cada byte de desenho, temos aquilo que e conhecido como cor 
de frente e cor de fundo. Na realidade, o que temos e uma cor. 
que serd usada para "pintar" os zeros do byte (cor de fundo), e 
uma outra cor. que serd usada para "pintar" os uns do byte (cor 
de frente). 

As duas ultimas dreas, correspondentes aos SPRITES, serao 
apenas citadas no detolhamento dos modos do SCREEN, pois 
sua andlise serd realizoda em outro artigo, por envolverem 
maiores detolhes que serdo discutidos na oportunidade. 

MODOS DE SCREEN 

Existem 4 modos de utilizarmos a VRAM, sendo adminislradas 
pelo VDP todas as peculiaridades de cada modo. Cada um 
deles se utiliza de uma tecnica na geracao de imagens do mais 
simples (SCREEN 0) ate a mais sofisticado (SCREEN 2). Por nao 
ter uma utilidade muito prdtica, em comporacao aos demais 
modos, nao anolisaremos o ultimo modo, correspondente 6 
SCREEN 3. Passemos, entao, d andlise isolada de cada modo, 
descrevendo o maneira de uso de cada drea da VRAM. 

SCREEN 

Modo que serve basicamente para criacdo de textos, sendo o 
modo que mais possibilita caracteres por linhas de imagem. 
Ele permite a criacao de telas textos, com ate 40 colunas por 24 
linhas. O que nos dd, para AREA DE APARICAO DE CARAC 
TERES, um espaco de 960 bytes (40x24). A forma que o VDP en 
controu para isto, foi usar apenas 6 ponlos de largura para 
cada caracter mostrado no video, o que nada otrapalha no uso 
de textos, pois todos as figures da tabela ASCII envolvidas com 
texto (letras, sinais ortogrdficos, etc), foram desenhodos coin 
apenas 5 ponlos de largura. 

A tabela de caracteres onde existe uma figure, para todos os 
eddigos de a 255. ocupa um espafo de 2 Kb, pois separa 8 by 
tes na formacao de cada caracter, possibilitando criar imagens 
em uma mafriz de 64 pontos (8 linhas de bytes, por 8 colunas de 
bits). Esta tabela, com o desenho de todos os caracteres, 
reside na ROM do BIOS, do endereco 1BBFH ate 23BEH, e e car 
regado na VRAM ao se escolher um modo de SCREEN (0 ou 1), 
no respectivo endereco, associado d AREA DE FORMACAO DE 
CARACTERES do modo selecionado. 
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Ja se ancontra no mercado a Nova Linha de Aplicativos Adminlstrativo/Finan- j 
ceiro em dBase II Plus denominada "Programs Plus" a qual conta inicialmen- 
le com os seguintes softs, prontos para usar: 

• Controls de estoque 

• Contas a pagar 
nconU ar*\ • Controle de bancos 

Todos com a mesma qualidade e garantia oferecida pelos produtos PRACTICA. 

Produtos em disco com seu respectivo ntimero de s6rie. manual completo e garantia. 
Conta tamb6m com direito a atualizagao de versao e Suporte Tecnico gratuito. 



PRACTICA 



Para malores Informacoes: Praclica Informatlca Uda - Av. Acoc6 579 - Indlanbpolls 
Telefone: (011) 5490545 ou Caixa Postal 64635 - Sao Paulo - SP - CEP 05497 



S3o Paulo ■ SP - CEP 04075 



Por ser urn modo mais associado a texlos, nao existe para 
SCREEN a 6rea de cores e as areas de SPRITES, ficondo a 
VRAM praticamente vazia, onde apenas 3008 bytes (2048 - 1 - 
960) sao utilizodos, podendo se usar o resto do espaco parao 
que se possa imaginar, ate mesmo dados do programa, sem 
que aparecam sujeiras no video ou que origine outro problema 
qualquer. Vejamos, entao, as posicoes das dreas da VRAM no 
modo Ode SCREEN: 

AREA DE APARICAO DE CARACTERES 0000H - 03BFH {960 BYTES; 

VA2IO 03C0H - 07FFH (I08B BYTES; 

AREA DE FORMACAO DE CARACTERES 0800H - OFFFH (2048 BYTE5) 

VA2IO 1000H - 3FFFH (12288 BYTES! 

Obs.: Os valores dos enderecos de inicio e lim de areas es 
tao expressos em hexadecimal. O tamanho das areas, colo 
cados entre parenteses, estao expressos em decimal, 

SCREEN 1 

Modo intermedidrio entre texto e grafico, que permite todos 
os recursos do modo anterior, mas que |6 possibilita maior 
flexibilidade, podendo utilizer drea de cores e alguns recursos 
gralicos (como SPRITES). Trabolha com todo a imagem do carac 
ter (8 pontos), o que implica em uma perda de 8 colunas de 
video, lormando textos de ate 32 colunas por 24 linhas, o que 
nos da urn total de 768 bytes para AREA DE APARICAO DE 
CARACTERES. 

A AREA DE FORMACAO DE CARACTERES funciona de modo 
andlogo ao modo 0, tambem sendo carregada da ROM do BIOS. 

A grande novidade neste modo reside na possibilidade de 
utilizarmos cores no desenho dos caracteres, de uma torma, 



porem, urn tanlo quanto curiosa. A AREA DE CORES DOS 
CARACTERES ocupa urn espaco de apenas 32 bytes da VRAM, o 
que nos deixa "pintar", com cores diferentes de (rente e fundo, 
grupos sequenciais de 8 caracteres (256 '32 = 88). Cada byte 
indica a cor de 8 caracteres seguidos, sendo o primeiro byte 
paro os primeiros 8 caracteres (codigo de a 7 da tabela ASCII), 
o segundo para os codigos de 8 a 15, e assim sucessivamente. 
A maneira de guardar duos cores ((rente e fundo) em apenas 
um byte e simples: Os 4 bits da esquerda suportam 16 codigos 
de cor, de 0000 a 1111, e indicom a cor de (rente; os 4 bits da 
direita funcionam de torma analoga, e representam a cor de 
(undo. Gostaria, apenas, de ressaltar, neste assunto de cores, 
que a cor 0, conhecida como Iransporente, de incolor nao tern 
nada. Representa, apenas, a cor da borda. ou seja, quondo al 
go tern cor em um equipamento MSX, signilica que este algo 
assumira a mesma cor da borda. Vejamos, entao. o mapea 
mento da VRAM para o modo 1 de SCREEN: 

AREA DE FORMACAO DE CARACTERES OOOOH 07FFH (2043 BYTES; 

VAZIO 0800H 17FFH (4096 BYTES;. 

AREA DE APARICAO DE CARACTERES . 1800H - 1 AFFH (768 BYTES) 

AREA DELOCAIIZACAODE SPRITES .. 1800H - 1B7FH 128 BYTES 

VAZIO 1B80H 1FFFH (1152 BYTES) 

AREA DE CORES DOS CARACTERES... 2000H- 20IFH (32 BYTES; 

VAZIO 2020H 37FFH (6112 BYTES) 

AREA DE FORMACAO DE SPRITES 3800H 3FFFH (2048 BYTES; 

Obs.: Como dito anteriormente, embora nao analisadas os 
areas referentes aos SPRITES loram citadas quonto as suas 
posicoes na VRAM. 
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SOFTWARE 



LANQAMENT0S 



1.1 



2.0 



A S0LUCA0 DEFINITIVA 
PARA SEU MSX 



PAC0TE DE CARNAVAL PARA VOCE CAIR NA FOLIA!! 



JABATO VS. IMPERIO 

JABATO EN AFRICA 

LICENCE TO KILL 

TOM & JERRY 

LIBER ATO 

CASANOVA 

ROADWARS 

ASTRO MARINE CORPS 

THE DEVIL CASTLE 

DESTROYER 

CADA JOGO 1.1 

NCz$ 30,00 

PRECO DO DISCO NCz$ 30,00 

A CADA 3 JOGOS 1.1 INCLUIR NO PEDIDO O PRECO 

DE UM DISCO, E A CADA JOGO 2.0 TAMBEM. 



DEEP FOREST 

KING'S VALLEY II 

DRUID 

WAR OF THE DEAD 

CADA JOGO 2.0 

NCz$ 40,00 



Pedido minima NCzS 150,00 



Os 20 melhores jogos da Konami para 1. 1 por ape- 
nas NCz$ 200,00 com disco incluso. 

Os jogos VIAGEM AO CENTRO DA TERRA HI-HI e 
MOT l-ll-lll por apenas NCz$ 100,00 cada colecao com dis- 
co incluso. 

A cada pedido acima de 4 jogos escolha mais 1 in- 
teiramente gratis. 

NOVIDADE 

Participe do exclusivo sistema on line Konami. 

Ao fazer o seu pedido voce sera" cadastrado auto- 
maticamente para receber os ultimos lancamentos antes da 
edigao da prdxima revista. 

Solicite cata'logo, e inteiramente gratis. 



Ao fazer o seu pedido, envie cheque nominal a KONAMI SOFTWARE INF0RMATICA 
- CEP 20001 , ou Vale Postal dirigido a Ag. Arcos, Crjdigo 522.31 7. 


LTDA. 


Rua Sete de Setembro 


92- 


-Sala 2210- 


- Rio de Janeiro - 


-RJ 
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SCREEN 2 

Modo grdfico nao muilo recomendado para uso de texlos. 
Mais dedicado oo uso de desenhos. Neste modo, e comum se 
dizer que possibiiita a criacdo de imogens com 512 colunas por 
192 linhas, so que de pontos, no lugar de caracleres. Esle en 
foque e apenas referencial. para ratificar a ideia de associacao 
com gr6ficos, que tern este modo. 

No verdade, o modo 2 de SCREEN administra 3 telas, com 3 
6reas de formagao, aparicao e cores dos carcleres: a primeira 
tela corresponde as 8 primeiras linhas do video; a segunda vai 
da linha 9 ate a linha 16; e a ultima da linha 17 a 24. 

No momento que esle modo e estabelecido, as tres AREAS 
DE APARICAO DE CARACTERES s3o preenchidas com os cd 
digos de a 255, e tres AREAS DE FORMACAO DE CARAC 
TERES soo preenchidas com bytes 0. Assim, o comum e criar 
mos imagens, mexendo nestas 6reas de formacdo, que estao 
inicialmente vazias, pois como as dreas de apariqao ja estao 
preenchidas, o envio de qualquer byte para as areas de (or 
macoo fard o byte aparecer como parte da imagem do cddigo N 
correspondente a AREA DE APARICAO DE CARACTERES. 
Notem que, por termos tres telas com dreas distinlas para 
todas elas, poderiamos, se quisessemos, escrever texlos neste 
modo, usar ale tres allabetos, sendo. cada um correspondente 
a uma das tres telas. 

A AREA DE CORES DOS CARACTERES tambem e muito 
maior. Podemos, na realidade, ter uma cor para cada byte 
(Irente e fundo), escrito no AREA DE FORMACAO DE CARAC 
TERES. Porlanto, as duas dreas sdo do mesmo tamanho. 

Mesmo neste modo, que usa quase toda a VRAM, oinda 
temos 1 1 52 bytes livres, que nao sao usados para nada. Isto se 
dd, pois as memdrias possuern capacidade mullipla de base 2, 
e a aue mais chega perto da quanlidode necessdria ao uso do 
maior modo (SCREEN 2) e a de 16Kb. Por isso, a sobra dos 1 152 
bytes. O mapa das dreas correspondente ao modo 2 de SCREEN 
e o seguinte: 



AREA DE FORMAQAO DE CARACTERES 0000H - I7FFH (6144 BYTES/ 

AREA DE APARICAO DE CARACTERES 1800H - 1AFFH (768 BYTES) 



AREA DE 10CAUZACA0 DE SPRITES 1BO0H - IB7FH (128 BYTES) 

VAZIO 1 B80H - 1 FFFH (1 1 52 BYTES) 

AREA DE CORES DOS CARACTERES 2000H - 37FFH ( 61 44 BYTES) 

AREA DE FORMACAO DE SPRITES 3B00H - 3FFFH (2048 BYTES) 

Obs.: As dreas foram mostradas em grupos totais das tres 
telas. Abaixo, temos a subdivisao, por tela, de cada uma das 
dreas: 

TELA 1 : 

AREA DE FORMACAO DE CARACTERES 0000H - 07FPH (2048 BYTES) 

AREA DE APARICAO DE CARACTERES I800H - 18FFH (256 BYTES) 

AREA DE CORES DOS CARACTERES 2000H - 27FFH (2048 BYTES) 

TELA 2: 

AREA DE FORMACAO DE CARACTERES 0800H - OFFFH (2048 BYTES) 

AREA DE APARICAO DE CARACTERES 1900H - 19FFH (256 BYTES) 

AREA DE CORES DOS CARACTERES 2800H - 2FFFH ( 2048 BYTES) 

TELA 3: 

AREA DE FORMACAO DE CARACTERES I000H 17FFH (2048 BYTES) 

AREA DE APARICAO DE CARACTERES 1 A00H - 1 AFFH (256 BYTES) 

AREA DE CORES DOS CARACTERES 3000H 37FFH (2048 BYTES ) 

CONCLUSAO 

Substitui o nome das dreas da VRAM, em comparacdo aos en 
contrados em literature especializada sobre MSX, puramenle 
com (ins diddticos, pois os nomes geralmente utilizados, como 
TABELA DE NOMES, ATRIBUTOS, nao significariam muita coiso 
para aqueles desacostumados com a manipulacao da VRAM, 

Talves alguns dos conceitos definidos nesle artigo nao te 
nham licado muito claros. Porem, a unica forma de compreen 
dermos certos detalhes e colocando os em prdtica. No nosso 
proximo artigo, veremos os famosos SPRITES, onde id apresen 
taremos rotinas em linguagem ASSEMBLY, que nos possibiiita 
rdo, um uso muito mais cloro e racional. no leitura e gravo<;ao 
da VRAM. Estas rotinas, apresentam alta performance, por 
manipularem diretomente as porlas de video, libertando, as 
sim, o uso exclusivo das rotinas do BIOS no que se refere ao 
envio e recuperacao de dados da VRAM. 




HARDWARES 

DRIVES DDX - MEGARAM DISK 

MODEM TELCOM- IMPRES- 

SORALADY80-MONITORES 

EXPANSORDE SLOTS -KIT 

TRANSFORMAQAO 2.0 - INS- 

TALADO EM 24 HORAS. 

SUPRIMENTOS 

DISKETES NASHUA 5 1/4 
FORMULARI0 80.-LIVROS 



SOFTS 

JOGOS E APLICATIVOS, 
MAIOR ACERVO DO BRASIL, 
SEMPRE COM AS ULTIMAS 
NOVIDADES. 




PACOTAO JOGOS 



(100 JOGOS + 5 APLICATIVOS) 
+ 10 DISCOS) = NCz$ 900,00 



(50 JOGOS + 5 DISCOS) 
= NCz$ 500,00 



SOLICITE NOSSO 
CATALOGO COMPLETO 
INTEIRAMENTE GRATIS. 



AV. 7 DE SETEMBRO, 3146 LOJA 20 -TEL. (041) 232-0399 - CURITIBA - PARANA - CEP 80230. 
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SIMULANDO 
QUALIDADE CARTA 

NA GRAFIX - MTA 



LUIS GUSTA VO MILFONT PEREIRA 



Assim como eu, vdrias pessoas que adquiriram uma impres 
sora Grafix — MTA, tiveram alguma frustracao pois, oo ler o 
manual que a acompanha, descobriram que ela noo possui o 
modo QUALIDADE CARTA. 

Em vista disso, criei uma rotina em assembler que permite 
que se imprima neste modo, que foi elaborado em um EXPERT 
PLUS, no Mega Assembler. 

COMO O PROGRAMA FUNCIONA 



O programa serd colocado a parlir do endereco 8HC000. 

Existem alguns cddigos em hexadecimal, que, ao serem 
jogados na rotina LPTOUT do bios (&H00A5), signilicam um 
comando para a impressora. No programa, carrega se o 
acumulodor com 1BH. Em seguido, joga-se o valor na rotina do 
bios. Este valor faz com que a impressoro aguarde um coman 
do. Apds, carrega se o acumulador com 41H e, pelo mesmo 
procedimento anterior, chama se a rotina LPTOUT. O codigo 



41 H e um comando especial que oltera o espacamento das 
linhas na impressora. O proximo byte, ter6 o valor do espa- 
camento. No coso, 00H, Entao , noo h6 espacamento. Exata 
mente. E e assim que o programa funciona. Ele imprime um 
determinado texto vdrias vezes sobre o mesmo lugar, fazendo 
com que a escrita fique mais escura, e, conseqiientemente, 
mais parecida com as letras de uma m6quina de escrever. 

Se voce quiser deixar o texto mais escuro, altere o endereco 
8HC028, que contem o numero de vezes que o cabecote da im 
pressora passar6 pelo mesmo lugar. Se voce colocar um valor 
maior, mais escuro o texto licard. Se, o valor lor menor, mais 
claro. Assim, voce pode controlar a intensidade de impressao, 
e ajustar para que a impressao nao fique "borrada". 

O codigo 32H restoura o espocamento natural do impressao. 

Se quiser alterar os cddigos de impressao, lembre se que o 
comando deve vir precedido de 1BH, e que estes cddigos de 
vem ser jogados na rotina LPTOUT, como caracteres normais. 

No manual da Grafix — MTA, existem tabelas de cddigos de 
comando para a impressora (pags. 21 e 22 — "Modo Texto"), 
mas se voce nao o possui af vao alguns cddigos: 



CR 


— Carriage Return 


— ODH 


LF 


— Line Feed 


— OAH(AVANCALINHA) 


FF 


— Form Feed 


— OCH(AVANCAFOLHA) 


ESC+"C" + N 




— 1BH 43H NH (COMPRIMENTO DA FOLHA) 


ESC + "A"+N 




— 1BH 41H NH (ESPACAMENTO) 


ESC + "2" 




— 1BH 32H (RESTAURA ESPACAMENTO) 


SO 




- OEH (CARACTER EXPANDIDO) 



Espero ter contribuido de alguma forma para os leitores des 
ta excelente revista, possuidores de uma Grafix- MTA. Se voce 
tiver alguma dica envie para a CPU. Compartilhe suas ideias 
com o publico, pois quanto mais informacoestemos ao nosso al 
cance melhor. 



Luiz Gustavo Milfont Pereira. 7/7/1973. 
Cursos: Basic, Basic avancado, Computai;ao 
Grdfica, Ingles Autodidata em Assembler. 
Profissao: Estudante. 
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NORTERM - Emulador de terminal para IBM-PC • compaffveis. Passe a 

compartHhor das programas, memoria, Winchester, etc. usando seu MSX como 

terminal. 

NORDDI • Interface controladora de at* 2 drives, 3 V» ou 5 V* face simples ou 

dupla. PadrOo MSX. 

NORDDI II - NORDDI + NORCLOCK num so cartucho. 

NORCLOCK - Passe a disoor de data e hora certa e a guardar todos os arqulvos 

com data e hora. Nao preclsa flcar llgado, contem pKhos. 

NOREPPG - Programodor de EPROM. Programa de 2716 ate 27256, sem tonte 

externa nem modules para EPROMs dlferentes. Permite utillzocoo de cassete e 

drive. 

NORTLX - Emulador de terminal de telex, passe a tazer uso da Rede Nacional de 

Telex usando seu MSX como terminal de telex. 






I»0BM*T1C» 



f 



Caixa Postal 371 
Goiania, GO - Cep 74000 
Tel.: (062) 251-0798 
Telex (062) 1340 
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SCREEN© bKEVOFF 

FORT=~£HC000 TO &HC04F 

R E A D A $ : p K E T , U A L ■: " & H " + A $ ':, 

NEXT 

D E F U S R = £ H C 

A-USROIO 

DATA 3E... 1 B, CD., AS, 0©, 3E, 4 1 , CD 



DATA 



■•"-. •=: iTj r 



00.. 3E , 00., CD, AS, 00, 16 



Listagem em BASIC do programaj 
1.'. a 1 i d ade C a r t a n a G R A F I X - M T A 
Digits a listagem se nab 
possuir urn monitor de I j nguagsm 
d e magu. i na . 



90 DATA 00, D5, 2 1 , 37., C0, ?E, CD., A5 
1 00 DATA 00, 23,, FE, 00., C2, 1 5, C0, 3E 
1 J. DATA 0D, CD, A5., 00., D 1 ., 1 4., 7A, FE 
1 20 DATA 0F, C2, 1 1 ., C0, 3E, 1 B., CD, A5 
1 3 D A T A , 3 E ., 3 2 ., C D ., A 5 ., , C 9 . 4 C 
1 40 DATA 55, 47., 55., 4D, 49, 50, 45, 20 
1 5 D A T A 5 3 , 4 F ... 4 6 , 5 4 , 5 7,41, 5 2 , 4 5 
1 60 DATA 2 1 , 00, 00, 00, 00, Q0, 00, ye 

Caso woce ten ha urn monitor, digite 
a listagem em LM, e grave -a com: 
BSAUE " qC -BIN " , S1HC000, &HC04F, &HC000 



lega Ass em bier 1 . 



Qualidade Carta na GRAF I 
P o r s L u i :z G u s t a •-.< o M i 1 f o n t 



X-MTA. 

Perei ra, 









ORG 


OC000H 


00A5 




LP 1 OUT 


: EQU 


00 ASH 


CPiPifi 


3E 1. IS 




LD 


A, 01BH 


C002 


CDA500 




CALL 


LPTOUT 


C005 


3E4 1 




LD 


A, 04 1 H 


C0G7 


CDA500 




CALL 


LPTOUT 


C00A 


3E00 




LD 


A, GO H 


C00C 


CDA500 




CALL 


LPTOUT 


C08F 


1600 




LD 


D, O0H 


C0 1 1 


D5 


LOOP: 


PUSH 


DE 


CG12 


2 1 37C© 




LD 


HL, TXT 


CG 1 5 


7E 


ROT: 


LD 


a, <hl:> 


C0 1 6 


CDA500 




CALL 


LPTOUT 


C0 1 9 






1 NC 


HL 


C0 1 A 


FE©© 




CP 


00H 


C0 1 c 


C215C0 




JP 


HZ, ROT 


C0 1 F 


3E0D 




LD 


A, ODH 


C021 


CDA500 




CALL 


LPTOUT 


C024 


Dl 




POP 


DE 


C025 


14 




I NC 


D 


C026 


7 A 




LD 


A, D 


C027 


FbWl- 




CP 


0FH 


C029 


C211C0 




JP 


HZ, LOOP 


C02C 


3E 1 B 




LD 


A, 01BH 


C02E 


CDA5G0 




CALL 


LPTOUT 


C03 1 


3E32 




LD 


A, 03 2H 


C033 


CDA500 




CALL 


LPTOUT 


C036 


C9 




RET 




C037 


4C554755 


TXT : 


DB 


'LUGUMIPE 


C03B 


4D495G45 








C03F 


20534F46 








C043 


54574152 








C047 


4521 








C049 


00 




DB 





C04A 






END 
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Listagem em LM do programs: 
Qua lid ade-ca r ta na GRAF I X-MTA . 



Pa ra g raua r (pelo B AS I C ;:■ : 

B S A U E " C . B I N " , & H C , & H C 4 F ... & H C 
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PROGRAMA 

UtilitariO 



Alternativas de 
impressao para 

o MSX-WORD 



SERGIO GUYPINHEIRO ELIAS 
PAULO ROBERTO PINHEIRO ELIAS 



INTRODUCAO 

O MSX-WORD e um dos mais ulilizados Processadores de 
Texlo pelos usudrios de microcomputadores da linha MSX. Es 
te sucesso e, em grande parte, expiicado pelas facilidades de 
manuseio que esle aplicativo oferece, traduzidas pelo seu 
dominio atraves de um periodo de treinamento relativamente 
•eduzido, no qual e possivel produzir orquivos de texto com um 
acabamento basfante razodvel, sem que se lenha tido alguma 
experiencia previa significative. 

De fato, e possivel observer se que, quando o usudrio esbar 
ra em dificuldades na utilizacao de um programa, a tendencia 
e abandond lo, proporcionalmente ao grau dos impecilhos e 
obstdculos na compreensao do seu funcionamento. Por outro 
lado, quando os resultados esperados sao obtidos o curto 
prazo, a empatia entre o usudrio e a mdquina aumenta o 
processo de aceitacdo e o desejo de avancar na aplicacao dos 
seus recursos. 

O MSX-WORD talvez tenha sido o primeiro editor de Textos 
capaz de falar e imprimir caracteres de lingua portuguesa de 
forma correta. Alem disso, devido a qualidades intrinsecas ao 
seu funcionamento, foi o primeiro aplicativo do genero que 
conhecemos adaptdvel as impressoras disponiveis hd alguns 
anas, as quais nao possuiam nenhuma das Tabelas de carac- 
teres do padrdo MSX, 

Talvez sejam estes fatores que mencionamos acima os res- 
ponsdveis pela permanencia deste Editor na preferencia do 
usudrio, pois, em alguns aspectos, em niveis de exigencia, 
digamos, mais profissionais, o programa deixa a desejar, tanto 
em relacdo aos recursos de edicdo, quanto aos recursos de im- 
pressao dos textos digilados. 

A EVOLUCAO DO MSX-WORD 

Ultimamente, a CIBERTRON vem se esforcondo no sentido de 
minorar as deficiencies notdrias que o Editor apresenta, ainda 
para o usudrio da serie 1 .0 do MSX, em ampla maioria no pals, 
o qual, normalmente, sequer faz uso de um monitor de video 
adequado para o funcionamento do computador. 

Ate a Versao 3.0 aparecer, o MSX WORD nao era capaz de 
aproveitar o funcionamento de um segundo drive, para or 
quivamento dos textos e ate a Versao 1 .6 nao conseguia im 
primir mais do que um arquivo-texto por vez. Isto sem falar na 
incompotibilidode da linha de texto gravada pelo programa, 



com outros Processadores que conseguiriam importar seus ar 
quivos. 

Quando a Versao 3.0 estava sendo fabricada, tivemos a opor 
tunidade de apresentar alguns pontos de vista nossos aos 
programadores da CIBERTRON, alguns dos quais foram aceitos 
e implementados no proqrama, como por exemplo, a retirada 
de algumos rotinas executadas. com pouca frequencia, pelo 
usudrio, do bloco em BASIC principal do programa e a odocao 
de uma unica rotina de leitura e gravacao de arquivos, com 
possibilidade de verificar a listagem do diretdrio e a memdria 
livre real do disco de cada um dos drives A e B. 

A primeira destas providencias citadas desmontou parcial 
mente o bloco principal em BASIC em arquivos de overloy 
perfeitamente substituiveis. Isto, por si s6, determinou uma 
enorme economic de memdria no micro, facilitando sobre 
maneira o funcionamento do programa, sem o chamado 
"crash" no computador (vulgarmente, "pau no programa"). O 
usudrio da Versao 3.0 poderd notar uma performance mais 
equilibrada desta Versao, sem praticamenle nenhum tipo de in 
terrup<;ao nefasta ao seu desempenho, sem comparacao. neste 
particular, com as Versdes anteriores. 

Todos os pontos relativos d acomodacao do programa no 
computador, bem como as rotinas de gravacao e leitura so 
freram todas as melhorias que tinham direito. Em contrapar 
tida, a rotina de impressao de arquivos texto permaneceu 
rigorosamente a mesma, talvez porque, nao tenha havido tern 
po hdbil suficiente para que nova rotina tivesse sido implemen- 
ted*). Seria, como de fato e, necessdrio alteror a parte em lin 
guagem de mdquina do programa, paro- que ocorresse umo 
mudanta radical na concep<;do da forme de digitocdo e edicdo 
de modo a acomodar mais de um tipo de impressao. 

Possivelmente, uma nova Versao, ainda a caminho, deverd 
solucionar de vez com estes percalqos. Enquonto isto nao ocor 
re, tudo o que poderemos fazer e oferecer olgumas alterna 
tivas de impressao, sem. e claro, rodicais compromissos com a 
qualidade final, pois isto deverd ficar por conta da futura nova 
Versao. 

AS ALTERNATIVAS 

Tres programas sao apresentados a seguir, mostrodos nos 
Figuras 1 a 3. Os dois primeiros trabalham externamenle ao 
Processador, lendo diretamente no disco de Irabalho onde os 
arquivos de texto estdo gravados, para depois imprimi los da 
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maneira selecionado pelo usudrio. O terceiro funciona junto 
com o progroma original, na forma de um overlay, portanto a 
parlir de um arquivo previamente lido e instalado na mem6ria 
do micro. 

Os programas das Figuras 1 e 2 sao bastante parecidos: 
obedecem a mesma rotino de leitura do disco, mas a deco- 
dificacao das linhas difere nas duas Versoes. O algoritmo de 
leitura e impressao e baseado no fato singular de que as linhas 
do MSX WORD terminam sempre pela sequencia CARRIAGE 
RETURN LINE FEED e que o comando LINE INPUT* e capar de ler 
uma string no disco sem delimitadores (aspas, etc.), de ate 254 
Bytes, ate que o sinal de CARRIAGE RETURN ( < CR > ) seja en 
contrado. Quando isto ocorre, o comando pula a sequencia 
< CR>- <LF> e aponta para a prdxima string a ser lido pelo 
comando LINE INPUT* seguinte (1). 

Na primeira Versao que fizemos deste progroma (nao pu 
blicada), desmontamos a linha do orquivo-texto e decodifi 
camos cada um dos Bytes, de maneira a identificar qual o tipo 
de caracter a ser impresso: se acentuodo, seria trocado pelo 
respectivo cddigo da impressora (no caso de incompatibiii 
dade), se cbdigo de controle da impressora (caracteres 192 a 
207), idem, alem de alguns ajustes necessdrios para colocar a 
linha do arquivo nas posicoes de digitacao. Infelizmente, a des- 
montagem, decodificacao e posterior remontagem tomava um 
tempo too grande (olinal de contas, este processo ocorria 68 
vezes por linha !), que o desempenho da rotina acabou pecan- 
do pelo lenliddo excessiva. Decidimos entao eliminar todo o fil 
tro de impressao e conservor apenas os ajustes necessdrios 
para o correto posicionamento das linhas do texto no for- 
muldrio. Este programa estd mostrado na Figure 1. Com estas 
providencias, o programa tornou se rdpido, porem baslante 
limitado de virtudes. Entretanto, poderd rodar comodamente 
com um liltro de impressao adequado, como aquele publicado 
no livro "Programocao Avancada em MSX" (2). 

No programa da Figura 2, foi conservada, alem do ajuste das 
linhas, uma decodificacao dos eddigos de comandos de impres- 
sora dispostos nos caracteres 192 a 207 mencionados anterior- 
mente. O leitor deverd tomar o cuidado de trocar os eddigos 
que constam daquela rotina para os eddigos efetivamente 
usados na adaptacao do Editor d sua impressora. No caso deste 
programa, a sua velocidade de execucdo ficard prejudicada 
pela lentiddo do rotina de decodificaqao, mas ndo chego a ser 
uma coisa intolerdvel como no primeiro caso. 

Em ambos os programas das Figuras 1 e 2, o usudrio recebe, 
na tela inicial, a chance de modificar uma serie de pardmetros 
de impressao. Cada um deles possui o seu prdprio default, lis- 



tados entre parenteses apds cada op^ao. Toda vez que um 
determinado pardmetro for modificado, as especificacoes en- 
tre parenteses mudardo de acordo. A numerocdo das pdginas 
poderd ser desligada ou redefinida para um valor diferente, no 
caso de mais de um arquivo ser impresso sobre o mesmo assun- 
to. Teoricamente, nao haverd limite de leitura de qualquer ar 
quivo no disco. Como os arquivos do MSX WORD sdo limitados 
pelo tamanho, para aumentd-los serd necessdrio merged los 
no prdprio disco (comando COPY do MSX DOS ou utilitdrio 
COPIARQdoSOLX DOS). 

No programa da Figura 3, o mesmo deverd ser gravado no 
disco de trabalho, com o nome de PAGINA. BAS ou qualquer 
outro nome de sua preferencia, tomando o cuidado de mante- 
lo igual na linha digitada a seguir, dentro do prdprio MSX 
WORD. As adaptacoes sao bostante simples, bastando fazer o 
seguinte: 

Carregue o arquivo MSXWORD3.0 do disco de trabalho. 
Neste bloco nao deverd existir a linha 820 (em se tratando de 
uma cdpia original do programa) e a 'otino de impressao 
deverd come^ar na linha 810. Assim, digite a linha 820, com as 
seguintes declaracoes: 

820 LOCATE 0,3:PRINT"Tecle.;<l> imp/linhos<2>imp/pdg. 
";:OS = INPUT$(l):PRINTO$.IFO$ = "l"THENPRINT:GOTO830EL 
SEIFOS = "2"THENRUN"PAGINA.BAS"ELSE820 

Se voce tiver diivida sobre a existencia da linha 820, serd 
sempre bom lisld-la antes de digitar a nova linha. De qualquer 
forma, esta deverd preceder as instru<;6es da rotina de impres 
sao normal do MSX-WORD. Terminada a digitacao, salve 
novamente o programa, antes de testd lo. 

Ao ser acionada, a impressao de um arquivo lexto poderd 
ser feila da forma habitual, pela opcao< 1 >, ou paginada, 
pela <2>. Neste ultimo caso, o arquivo- lex to nao deverd con 
ter eddigos de FORM FEED — CHRS (12) - embebidos no texto, 
pois isto alterard a paginocao imposta pela rotina. O usudrio 
terd direito a definir o numero da pdgina ou a ausencia de 
numeracoo. logo que a rotina for acionada. E obrigatdrio teclar 
<return > (ou <CCR>) para numerar e N ou n para nao nu- 
merar. O programa sempre apresentard a pdgina 1 como 
inicial, podendo entao ser redefinida para outro numero. Se a 
numerocoo nao for desejdvel, o programa pula para a opedo 
de numero de pdginas por linha. O default e de 55, consideran- 
do-se o padrao de 66 entrelinhas de comprimento na pdgina, o 
qual nao poderd ser alterado. Por causa disso, o valor mdximo 
para esta op^ao e de 60 linhas de texto. Nas opedes seguintes, 
o usudrio poderd definir as pdginas inicial e final para impres- 
sao. Teclando < return > em ambas as perguntas, serao se- 
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lecionadas as pdginas inicial e final, respectivamente. Lembre- 
se que, neste caso, o numero das pdginas serd determinado 
pela sua rela<;ao com o volume de lexto delerminado pela per 
gunla anterior, |d que nao e possivel saber "a priori" onde 
ficam esles limiles no corpo do texto, a nao ser que o pr6prio 
usudrio tabele e delimite as linhas onde as pdginas ficam. 

As perguntas a seguir se referem ao numero de cdpias e a 
necessidade de pausa na impressao. Neste ultimo Hem, ao 
contrdrio da rotina original, o programa realmente pdra ao fim 
de uma pdgina impressa. possibilitando usar folhas soltas sem 
problemas. Antes da impressao, o usudrio tern a opcao de 
desistir e voltar ao programa principal ou, durante a impressao 
propriamente dita, teclar ESCAPE com a mesma finali 
dade. Neste ultimo caso, o programa abre uma tela de con- 
trole, informando cada cdpia, pdgina e linha impressas, pos 
sibilitando saber ate onde a impressora ird operar autono 
mamente quando a rotina for interrompida. Teclando-se 
<STOP > ao inves de <ESC>, a impressao estanca aid que a 
tecla seja novamente pressionada. Nenhuma rotina de inter- 
rup?ao de <CSTOP > foi colocada no programo, que pudesse 
interferir nesta funcao. 

comentArios finais 

Nao espere nada de excepcional no programa da Figure 3, 
mas podemos garantir que, pelo menos em nossos testes, ele 
funcionou a contento, ressalvados algumas limitacdes de for- 
matacdo.como por exemplo, as linhas serao sempre impressas 



em salto simples (espocomento 1) e o documento impresso (de 
tamanho fixo) nao terd cabecalho ou rodape, como nos pro 
gramas anteriores. A nosso ver, nao se deve encher demais 
uma pdgina de texto, sendo o default de 55 linhas/pdginas 
suficiente para a maioria dos documentos. Todos os esforcos 
foram feitos para lornar o programa pequeno de modo a nao 
causar problemas na drea de memoria do micro, evitando qual- 
quer possibilidade de "crash" no sistema. Esperamos que, mes 
mo com as limitacdes comentadas, ele possa ser util a um bom 
numero de usudrios, aid que nova Versao do MSX WORD 
venha a publico com melhores solucoes. 
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'PROGRAMA PARA IMPRIMIR 
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'ARQUIVOS-TEXTO 


DO MSX-WORD 
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'AUTORESrS.G.P. E. /P.R.P. E. 
















40 


'DATA: NOVEMBRO 


DE 1989 
















50 


KEY OFF: LOCATE, 


0:CLEAR 1000 














60 


ON ERROR GOTO 210 
















70 


A$="NA0" :B$="NAO" :A=1:B=8:C= 


= 55 :F1 = 


: F2=l 


L$ = 


"SIM" :R= 


= 




80 


CLS 


















90 


PRINT"IMPRESSAO 


DE ARQUIVOS- 


TEXTO 


DO MSX- 


-WORD" : 


LOCATE13, 2 


PRI 


NT' 


Menu Principal" 


LOCATE1 ,4: PRINT" ( 


) ind 


team 


es 


tado 


atual 


das 


f uncoes" 


















100 LOCATE, 6: PRINT 


'1 - IMPRIME 


CABECALHO (" 


;A$; 


")' 








110 LOCATE, 8: PRINT 


'2 - IMPRIME 


RODAPfi 


(" ;BS 


; " ) " 










120 LOCATE, 10: PRINT" 3 NUMERACAO DAS 


PAGS. 


("; 


L$: 


") 








TUDO O QUE VOCE VE POR Al, 
VOCE ENCONTRA AQUI. 
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MSX SHOP 

RETRATO FALADO 



Aiendemos a lodo o Brasil com Seguranga e Rapidez. 

INFORMAfjdES E PEDIDOS PARA: 

Cx. Postal 13.661 , CEP 20.071 - Rio de Janeiro - RJ - Tel.: (021) 201-8553 
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Cadastramos Revendedores emTodo o Brasll 



MSX TOP-SECRET 

UM SUPER UTILITARIO TOTALMENTE INOVADOR NO MERCADO MSX, QUE 
COMPREENDE NADA MENOS QUE TODAS AS QUALIDADES DOS UTILITA- 
RIOS QUE JA FIZERAM SUCESSO NO MERCADO MSX. COM TOP-SECRET 
E POSSfVEL: ZAPPEAR UM DISQUETE, COPIAR E FORMATAR UM DISCO 
COM INCRI'VEL FIDELIDADE, EDITAR SPRITES 8X8 E 16X16, TRANSFOR- 
MAR E ELABORAR GRAFICOS COM COMANDO DRAW DO BASIC, ARMA- 
ZENAR SUAS INFORMAQOES EM UM SUPER BANCO DE DADOS, EDITAR 
ALFABETOS PARA USO EM QUALQUER SCREEN, IMPRIMIR TELAS E OU- 
TRAS SUPER FERRAMENTAS. 



PALHADA CITY 

PROVANDO QUE CRIATIVIDADE E DIFERENTE DE NOME COMERCIAL.A 
YOUNGSOFT LANQA UM SENSACIONAL ADVENTURE QUE ALTERNA REALI- 
DADE E FICCAO, DRAMA E COMEDIA EM UMA MISTURA HOMOGENEA DE 
MUITO SUSPENSE E BOM HUMOR. RIO DE JANEIRO 01/01/2000. E NESSA 
DATA HISTORICA QUE ARIONALDINO, FAMOSO HISTORIADOR HOLANDES 
DESCOBRE QUE NA PACATA PALHADA CITY EXISTEM MUITOS SERES 
ALIENlGENAS E ALIENADOS QUE ESCONDEM A MAIOR FORTUNA EM PE- 
DRAS PRECIOSAS DO MUNDO.CONSEGUIRA ARIONALDINO ESCAPAR DE 
PALHADA CITY? 
GRAFICOS BELfSSIMOS E OTIMA TRILHA SONORA. 
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Cadestramoa Revendedores em Todo Brasil 



YOUNG PACKS - A SOLUCAO JOVEM 



/ 




SPECIAL PACK 5 

RESGATE 

ATLANTIDA 

73 



~2i 



MEGA PACK I 
PINGUIM ADVENTURE 
KNIGHTMARE II 



YOUNG PACK 3 
MOT THE MONSTER I 
MOT THE MONSTER II 
MOT THE MONSTER III 
MARTIANS 



2=z: 



M£GA PACK 2 
NEMESIS I 
/ NEMESIS II 



Z 



MEGA PACK 7 

FI-SPIRIT 

VAXOL 



YOUNG PACK 4 

AVERNO 
ARTICFOX 
CORSARIO 
PETROVC 



1 



MEGA PACK 8 
DRAGON QUEST 
NEMESIS TWINBEE 



YOUNG PACKS 1 
ASTRO MARINE CORPS 

TOM & JERRV 
DIVIL'S CASTLE 
30 POOL 



YOUNG PACK 9 

EMILIO BUTRAGUENO I 
EMILIOBUTRAGUENOII 
MATCH DAY II 
POWER OF DARKNESS 

i^- s ^~ 



Z 



YOUNG PACK 7 
FREDDY HARDEST I 
MAMBO 
RATHA-THA 
TERRAMEX 

\ \ 



YOUNG PACK 10 

TITANIC I 
\ TITANIC II 
' TUAREG 
STRIP POKER 



YOUNG PACK 8 

OUT RUN 
OPERATION WOLF 

WEC LEMANS 
WEST BANK 



5=X 



YOUNG PACK 11 

ESQUADRAOCLASSE 
COMANOO TRACER 
MUTAN ZONE ' 
MUTAN ZONE 



..A 



TT 



Young Pack 
Mega Pack 
Special Pack 



NCz$ 150,00 
NCz$ 120.00 
NCz$ 120.00 



Tambem temos pacotes de 5 e 1 
Jogos, de aplicativos. educativose 
programas em geral. CatSlogo gra- 
tis. 

Para fazer seu pedido 
Envie carta detalhada 
Para Youngsoft c/cheque 
nominal a Yvone Di Santo Barboza 

Prazo de Entrega: 
Disco = 10Dias 
Fita = 20 Dias 
Garantiade 3 Meses 

Temos toda linha de perife"ricos do 
mercado a precos alucinantes. 



YOUNG CLUB 



Associe-se ao mais ousado clube de 
usuarios do Brasil. 

Vejas as vantagens: 50% de desconto 
em jogos, 20% em aplicativos e 1 5% em 
revistas CPU. Urn pacote de jogos por rn.es 
e urn de aplicativos a cada 3 meses. Cata- 
logo mensal com novidades da firma e do 
mercado em si. Concursos, Promogoes, 
Brindes, etc. 



Para fazer parte do Young Club basta 
enviar carta detalhada dizendo a configura- 
gao do seu equipamento, os pacotes que 
deseja receber e envie junto urn cheque 
nominal e cruzado a Yvone di Santo Bar- 
boza no valor de (10) btn's (btn mensal). 



Obs.: associado so tera direito aos beneffcios apds o 
segundo pagamento. Pagamento mensal. 



Youngsoft 

informAticaltda. 



A 1' SOFTHOUSE DE NOVA IGUAQU 

Travessa Almerinda Lucas de Azeredo 
11/1211 - Centro - Nova Iguacu - Rio de 
Janeiro -CEP 261 50 
Tele-Jovem: (021) 767-9545 / Ramal 90 
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LOCATE, 11: PRINT' 


REDEFINIC&O DA NUMERACAO ( " ; R ; " ) " 




140 


LOCATE, 13: PRINT' 


4 - DEFINE OFFSET DE IMPRESSAO (";B;")" 




150 


LOCATE, 15 : PRINT' 


5 - DEFINE NO DE LINHAS/PAGINA ( " ; C ; " ) " 




160 


LOCATE, 17 : PRINT' 


6 - IMPRIME TEXTO" 




170 


LOCATE. 19 -.PRINT' 


7 - ABANDONA O PROGRAMA" 




180 


LOCATE, 21 : PRINT' 


Sua opgao: 




190 


CS=INPUTS (1) : IF 


C$<"1" OR C$>"7" THEN 80 ELSE PRINT C$ : 


FOR T 


=1 TO 100:NEXT T 






200 


ON VAL(C$) GOTO 


240,300,380,440,510,560,960 




210 


IF ERR053 THEN 


CLS:PRINT"FOI DETECTADO UM ERRO NO : " ; ERR ; "LI 


NHA 


";ERL:GOTO 2 30 






220 


IF ERL=610 THEN 


PRINT: PRINT"Arquivo nao existe" : CLOSE : PRINT : 


PRlNT"Tecle algo" : T$=INPUT$ (1 ): RESUME 560 




230 


CLOSE: PRINT:PRlNT"Tecle al go" : T$-INPUT$ ( 1 ): RESUME 80 




240 


CLS: PRINT"OPCAO 


PARA IMPRESSAO DE CABECALHO" 




250 


LOCATE. 5 : PRINT"Conf irma lmpressao de cabecalho (S/N) ?" 


; :C$ = 


INPUTS (1) 






260 


IF C$="N" OR C$= 


= "n" THEN A$="NAO" : GOTO 80 ELSE IF C$="S 


" OR 


C$=' 


'a" THEN A$="SIM' 


-.GOTO 270 ELSE 240 




270 


LOCATE0, 7 : PRINT' 


Digite o cabecalho (m£x.:55 caracteres) 


it 


280 


LINE INPUT D$:IF LEN(D$)>55 THEN PRINT : PRINT"Cabecalho 


com m 


ais 


de 55 caracteres" :PRINT"Tecle algo" ELSE IF D$="" THEN 


270 E 


LSE 


80 






290 


T$=INPUT$ (1) :GOTO 240 




300 


CLS:PRINT"OPCAO 


PARA IMPRESSAO DE RODAPfi" 




310 


LOCATE0 , 5 : PRINT' 


'Confirma impressao de rodap£ (S/N) ?" ; : 


C$ = IN 


PUTS (1) 






320 


IF C$="N" OR C$= 


="n" THEN B$="NAO" :F1=0: LS="NAO" : GOTO 80 


ELSE 


IF 


C$="S" OR CS="S" THEN B$="SIM" : GOTO 330 ELSE 300 




330 


LOCATE0 , 7 : PRINT' 


'Digite o rodape (m3x.:55 caracteres)" 




340 


LINE INPUT E$:IF LEN(E$)>55 THEN PRINT : PRINT"Rodap6 com 


mais 


de 


55 caracteres" :PRINT"Tecle algo" ELSE IF E$="" THEN 300 


ELSE 


360 






350 


T$=INPUT$ (1) :GOTO 300 




360 


LOCATE0 ,11 : PRINT"Inclui numeracao (S/N) ?" ; 




370 


C$=INPUT$ (1) :IF 


C$="N" OR C$="n" THEN F1=0 : F2=0 : L$="NAO 


" : GOT 


80 ELSE IF C$="S" 


OR C$="s" THEN Fl=l: F2=0 : L$="SIM" : GOTO 


80 EL 


SE 


360 






380 


CLS: PRINT"OPCAO 


PARA NUMERACAO DAS PAGINAS" 




390 


LOCATE0,5:PRINT 


'Confirma nova paginagao (S/N) ?" ; 





>; 



PHENIX INFORMATICA 



Temos os mais recentes lanpamentos de 1.0 e 2.0 com ou sem 



/* 



OtY Megaram de 360 KB ou 720 KB. 3 1/2 e 5 1/4. 

^J / Aproveite a nossa promocSo na comora de 1 jogos normais. leve 

Oi / mais 3 a sua escoina. Nao eslSo inclufaos disco, fita e laxa de posiagem. 

.TRABALHAMOS COM TODA LINHA DE PERIFERICOS. 



J0G0S ESPECIM* 



> TRANSFORMACOES PARA 2.0 

• PLACA DDX 

• MEGARAM DISK 256 KB DDX 

REVENDEDOR AUTORIZADO MSX SOFT. 



> DRIVES 

> IMPRESSORAS 
•MODENS 



0BUTERAT0R0/F J"^ 



Enlreqamos r^oldo: 

ligue para (021 ) 580-0651 ou envie cheque nominal cruzado a Antonio Jose' Caetano da Silva Caixa Postal 23081 - CEP 20922 - Rio de Janeiro - RJ 
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400 C$=INPUT$ (1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 




$="s" THEN 410 ELSE 390 




410 LOCATEO , 7 :PRINT"Digite para nao numerar pdginas." 




420 LOCATEO, 9 : INPUT"Qual o novo mimero da pdgina " ;A 




430 IF A=0 THEN F2=0 : L$="NAO" : F5=0 :GOTO 80 ELSE IF A>0 THEN F2=l 




:L$="SIM" :R=A:F5=1 : GOTO 80 ELSE 420 




440 CLS:PRINT"OPCAO PARA OFFSET DE IMPRESSAO" 




450 LOCATEO, 5 : PRINT"Conf irma redefinicao de offset (S/N) ?"; 




460 C$=INPUT$ (1) : IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 




$="s" THEN 470 ELSE 450 




470 LOCATEO, 7 :INPUT"Qual o novo offset de impressao ";B 




480 IF B>0 AND B<17 THEN 80 ELSE IF B<0 THEN LOCATEO , 7 : PRINT SPA 




CE$ (39) :GOTO 470 




490 LOCATEO, 11 :PRINT"CUIDADO: offset alto. Redefine (S/N) ?"; 




500 C$=INPUT$ (1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 




$="s" THEN 470 ELSE LOCATEO , 11 : PRINT SPACES (39) :GOTO 490 




510 CLS:PRINT"OPCAO PARA N' DE LINHAS/PAGINA" : LOCATEO , 2 : PRINT"M3 




ximo aceito pelo programa: 55" 




520 LOCATEO, 5 :PRINT"Conf irma novo nO de linhas/pag. (S/N) ?'*; 




530 C$=INPUT$(1) : IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 




$="s" THEN 540 ELSE 510 




540 LOCATEO, 7 :INPUT"Qual o nO de 1 inhas/pagina ";C 




550 IF C<0 OR C>55 THEN LOCATEO , 11 : PRINT"Numero de 1 inhas/p^gina 




ilegal":GOTO 540 ELSE 80 




560 CLS:PRINT"OPCAO DE IMPRESSAO DE ARQUIVOS-TEXTO" 




570 LOCATEO, 2 :PRINT"Indique o drive (A/B) ";: F$=INPUT$ ( 1 ): PRINT 




F$: PRINT: PRINT 




580 IF F$="A" OR F$="a" THEN FILES"A:" ELSE IF F$="B" OR F$="b" 




THEN FILES "B:" ELSE 570 




590 PRINT: PRINT :PRINT"Nome do arquivo : (<RETURN> sai da opcao) " 




600 LINE INPUT G$ : IF G$="" THEN 80 ELSE G$=F$+CHR$ (58) +G$ 




610 OPEN G$ FOR INPUT AS #1 




620 CO=l :F4=0:A=1 : PRINT: PRINT"Comeca impressao na pagina (1): "; 




630 INPUT CO: IF CO=0 THEN CO=l:A=l ELSE IF CO=2 THEN A=2:CO=l:F4 




=1 ELSE IF CO>2 THEN A=CO:CO=CO-l ELSE IF CO<0 THEN PRINTrPRINT" 




Valor ilegal":GOTO 620 




640 TE=20 : PRINT: PRINT"Termina na pagina (Ultima): ";: 




650 INPUT TE:IF TE<CO THEN TE=CO+l ELSE TE=TE+1 




660 IF F5=l THEN PRINT : PRINT"Numeragao redefinida para :" ;R : PRINT 




"Confirma (S/N) ?" ; ELSE 700 




670 C$=INPUT$ (1) :IF C$="S" OR C$="s" THEN A=R : GOTO 710 ELSE IF C 




$="N" OR C$="n" THEN 680 ELSE 660 




680 PRINT: PRINT" Abandona impressao (S/N) ? ; " 




690 C$=INPUT$ (1) :IF C$="S" OR C$="s" THEN 80 ELSE IF C$="N" OR C 




S="n" THEN 710 ELSE 680 




700 PRINT: PRINT"Pausa entre as p^ginas (S/N) ?" ; 




710 C$=INPUT$(1) :IF C$="S" OR C$="s" THEN F6=l ELSE IF C$="N" OR 




C$="n" THEN F6=0 ELSE 700 




720 PRINT: PRINT: PRINT"Prepare a impressora e tecle algo" ; :T$=INP 




UT$(1) 




730 CLS: PRINT" [ESC] = sai da impres'sao" : PRINT : PRINT" [ STOP ] = pau 




sa/continua" 




740 IF CO>l OR F4=l THEN GOSUB 980 




750 REM INICIA IMPRESSAO 




760 IF A$="SIM" THEN LPRINT TAB(B);D$ ELSE LPRINT 
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770 


LPRINT 


780 


X$=INKEY$:IF X$=CHR$(27) THEN CLOSE:GOTO 80 


790 


FOR 1=1 TO C 


800 


IF EOF(l) THEN CLOSE : F3=l : GOTO 860 


810 


X$=INKEY$:IF X$=CHR$(27) THEN CLOSE : GOTO 80 


820 


LINE INPUT*1,H$ 


830 


I$=MID$(H$,2,67) 


840 


LPRINT TAB(B) ;I$ 


850 


NEXT I 


860 


K=I-1 


870 


FOR L=l TO 55-K:LPRINT:NEXT L 


880 


IF B$="SIM" THEN LPRINT TAB(B);E$;" "; 


890 


IF Fl=l THEN LPRINT"P^g. : " ;A:GOTO 910 


900 


IF F2=l THEN LPRINT TAB(39);A 


910 


A=A+1 


920 


IF F3=l THEN F3=0:LPRINT CHR$ (12) : GOTO 80 


930 


LPRINT CHR$(12) 


940 


IF F6=l THEN LOCATE0 , 5 : PRINT"Tecle algo para cont inuar" ; :T$- 


INPUTS (1) 


950 


IF A=TE THEN CLOSE -.GOTO 80 ELSE 750 


960 


CLS:PRINT"Conf irma saida do programa (S/N) ?" ; 


970 


C$=INPUT$(1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$-"S" OR C 


$="! 


3" THEN END ELSE 960 


980 


FOR 0=1 TO C*CO 


990 


IF EOF(l) THEN CLOSE : GOTO 80 


1000 LINE INPUT* l f H$ 


1010 NEXT 


1020 RETURN 


Figura 1 Programs paginador de arquivos-texto no MSX-WORD, sem 




os recursos de decodif icagao dos cddigos de controle 




de impressora. 


10 


PROGRAMA PARA IMPRIMIR 


20 


ARQUIVOS-TEXTO DO MSX-WORD 


30 


AUTORES :S.G.P.E./P.R.P.E. 


40 


DATA: NOVEMBRO DE 1989 


50 KEY OFF: LOCATE, , : CLEAR 1000 


60 ON ERROR GOTO 210 


70 A$<="NAO":B$-"NAO":A«1:B«8:C = 55:F1 = 0:F2 = 1:L$="SIM" :R-0 


80 CLS 


90 PRINT" IMPRESSAO DE ARQUIVOS-TEXTO DO MSX-WORD" : LOCATE13 , 2 : PRI 


NT"Menu Principal" : LOCATEl , 4 : PRINT" ( ) indicant estado atual das 


f lingoes" 


100 


LOCATE, 6: PRINT" 1 - IMPRIME CABECALHO ( " ; A$ ; " ) " 


110 


LOCATE, 8: PRINT" 2 - IMPRIME RODAPfi (";B$; ")" 


120 


LOCATE, 10: PRINT" 3 - NUMERACAO DAS PAGS . (";L$;") 


130 


LOCATE, 11: PRINT" REDEFINICAO DA NUMERACAO (";R;")" 


140 


LOCATE, 13 :PRINT"4 - DEFINE OFFSET DE IMPRESSAO (";B;")" 


150 


LOCATE, 15 :PRINT"5 - DEFINE N' DE LINHAS/PAGINA (";C;")" 


160 


LOCATE, 17 :PRINT"6 - IMPRIME TEXTO" 


170 


LOCATE, 19: PRINT" 7 - ABANDONA O PROGRAMA" 


180 


LOCATE, 21 :PRINT"Sua opgao : "; 


190 


C$=INPUT$ (1) :IF C$<"1" OR C$>"7" THEN 80 ELSE PRINT C$ : FOR T 


=1 TO 100:NEXT T 
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TELEFONE 
(011)825-5240 



Drive 5 1/4 e 3 1/2 720 Kb - Impressoras - Monitores - Multi Modem 
Cartao 80 Colunas • Cartucho Megaram - Computadores 



SUPER JOGOS 

Cada super jogo ocupa urn Disquete inteiro. Acompanha embalagem 
e manual de instrucoes. Promogao do mes: na compra de 4 jogos vo- 
ce recebe mais 1 gratis, com disquete. 

NEMESIS - R0B0C0P - ELITE - DOUBLE DRAGON - OPERATION WOLF 
- RENEGADE III - SILENT SHADOW - PACMANIA - ABADIA DEL CRIME ■ 
FIRE TRANT - FUNTSTONES - PARIS DAKAR - HARRIER - GAUNLENT • 
LA HERANCIA - DESESPERADO - 4x4 ROAD RACING. 

Prego de cada super |ogo com tudo incluso: NCzS 170,00 ou NCz$ 
1 10,00 mais o custo do disquete e sem manual. 



SUPER UTILITARIOS 

Podem ser gravados ate 6 por disco menos os de tela, music e turbo 
que sao 1 por disco. Promocao: na compra de 4 jogos voce ganha mais 
1 gratis com disquete. 

ZAPPER I • ZAPPER II • LINGUAGEM MUMPHS.- VIDEO TEXTO - SYST TUR- 
BO PASCAL - COBOL - ED MUSIC + 50 TEMAS - DRAW & PAINT - UNI- 
TELA + 39 TELAS - GRAFIC MASTER - PROLOG - TRADUTOR. 

Preco de casa Soft NCzS 300,00 mais o custo do disquete, nSo cobra- 
mos taxa de correio. 



SUPER APLICATIVOS 

Ocupa um disco para cada soft. Acompanha embalagem e manuals de 
mstrugoes. Promocao: na compra de 5 jogos escolha mais 1 gratis com 
disquete. 

WORDSTAR 40 - WORDSTAR 80 - AGENDA - CONTROLE DE ESTOQUE 
MALA DIRETA - CONTROLE BANCARIO - CONTAS A PAGAR • CONTAS 
A RECEBER - CONTROLE DE CAIXA - FOLHA DE PAGAMENTO. 

Preco de cada Soft NCzS 300,00 com tudo incluso, ou NCzS 175,00 
mais o custo do disquete e sem manuais. 



EDUCATIVOS 

Estes programas sao fornecidos em packs com 10 programas mais um 
copiador Disco/Fita/Disco. Podem ser gravados em disquete ou f ita cas- 
sete. Promocao: compre 4 packs e ganhe mais 1. 
PACK 701: Aprendendo a Contar • Circo - Encanto - Maior/Menor - Men- 
talizar - Anagrama I • Anagrama II - Mago Voador I Abelha Sabia III - Ma- 
caco Academico. PACK 702: Matrizes Cqmplexas - Eletricidade - Geo- 
metria - Quimica - Matematica I • Gases - Otica - Fisica I - Ingles I - Curso 
de Basic IV. PACK 703: Pescador Espacial I - Motorista Sideral I - Moto- 
nsta Sideral II - Abelha Sabia I - Abelha Sabia II - Missao Resgate I - Mis- 
sao Resgate II Mago Voador II - Palhago Explorador I - Palhago Explo- 
rador II PACK 704: Mapa Game - Fisica - Fisica (exercicios) Ingles II 
Figuras Geometricas - Celulas I - Celulas II • Optica II - Gases II Ban- 
deiras da Europa. PACK 705: O Firmamenlo - Antmo - Sol Geome- 
tria - Selva de Palavras - Multipuzzle - Operacoes Matemalicas- Memory 
Game - Teste de Intehgencia - Nona de Numeros. 

Preco de cada Pack: NCzS 300,00 mais o custo do disquete ou da lita 
cassete. 



REDI-UNIVERSOFT 

INFORMATICA 

LTDA. 



APLICATIVOS E UTILITARIOS 

Estes softs sao fornecidos em packs com 10 softs mais 1 copiador Dis- 
co/Fita/Disco. Podem ser gravados em disquetes ou fita cassete. Pro- 
mogao: compre 4 e ganhe mais 1. 

PACK 501: Agenda Domestica I - Banco de Dados I ■ Mala Direta I - Con- 
trole de Estoque I - Uni-Word 2.0 - Editor de Sprit I - Pencil Design - Con- 
tas a Pagar e Receber - Ed Music • Planilha de Calculo. 

Preco deste pack com manual de instrucSes e tudo incluso: NCzS 364,00 
ou NCzS 300,00 mais o custo do disco ou lita sem manual. 



SUPER PACKS DE JOGOS 

Estes packs sao compostos por 6 jogos mais 1 copiador Disco/Fita/Dis- 
co. Disponivel apenasem disquete Promogao: na compra de 3 ganhe 
mais 1 gratis. 

Super Pack 308: Chicago - Taipan - Naves Moves I - Sol Negro I - Asparg 
(corrida de moto) - Rampart. Super Pack 309: Coliseu - Butraguenho 
(f utebol) - Minder - Titanic I - Barba Negra I Simulador 747. Super Pack 
310: Humprey - Lady Safari - Mad Mix (tipo pacman) - Naves Moves II 
- Sol Negro II - Titanic II. Super Pack 311: Chubby Gristle - October - Po- 
wer - Reflex - Thor - Tuareg. Super Pack 312: Esquadrao Classe A - Co- 
losos 4 - Mutant Zone I - Mutant Zone II - Sabrina - Comando Trac. Su- 
per Pack 313: Cosme Estible - Fire Star ■ The Jewels Dark I - The Jawels 
Dark II - Out Run - Wells Fargo. Super Pack 314: Adicta • Hercules - The 
Jewels Dark III ■ Jast - Peter - Aramo. Super Pack 315: Bounce - Strange 
• Final Contidoun - Strip - Bouken - Vortex Super Pack 316: Triple Co- 
mando - Barbarian - Legion - Ghost - Terramex - Tetnx. 

Prego de cada super pack: NCzS 1 1 0,00 mais o custo do disquete. 



NOVIDADES 

1). Gonzales I - Terror Pods - Wee Lemans - Paravia - Metropolis - The Pink 
Panter. 2). Gonzales II - Soldier of Ligth - Ulises - Trivial - Adel - Bob 007. 
3). After the War I - After the War II - Xenon - Syndrome - Obi iterator - 
Skate Dragon. 
Prego NCzS 1 75,00 mais o custo do disquete 



MSX 1 MEGARAM: Pinguin Adventure - Nemesis 2 - Nemesis 3 - King's 
Valley 2 - Final Zone Knight Mare 2 - Knight Mare 3 - Dragon Quest - 
Gall Force - DDS - Fl Spirit - Nemesis 4 ■ Jov Sherl Hoi. 
Prego de cada: NCzS 55,00 mais o custo do disquete 1 por disco. 



PEDIDOS 

Para fazer pedidos destes produtos. basta relacionar em uma folha de 
papel o nome ou numero de cada programa. Mande junto com um Che- 
que Nominal e cruzado para Recursos Digitals Informatica e Comer- 
cio Ltda. Rua Conselheiro Brotero. 589 Conj. 42 - CEP 01154 - Sao 
Paulo-SP 

Os pedidos em disco serao atendidos em 15 dias, pedidos em fita serSo 
atendidos em 30 dias. Nossos produtos tern garantia de 180 dias. Prego 
do disquete 5 1/4 NCzS 55,00. Disquete 3 1/2 NCzS 75,00. Fita cassete 
C-60 NCzS 65,00. 

A REDI-UNIVERSOFT ESTA CADASTRANDO RE- 
VENDEDORES EM TODO TERRITORY NACIONAL. 



REDI-UNIVERSOFT LTDA. 

Rua Cons. Brotero, 589 Conj. 42 

(a 200 metros do metro Mai. Deodoro) 

CEP 01154 Santa Cecilia - Sao Paulo-SP 

Tel.: (Oil) 825-5240 




200 ON VAL(C$) GOTO 240,300,380,440,510,560,960 

210 IF ERR053 THEN CLS : PRINT"FOI DETECTADO UM ERRO N ' : " ; ERR ; "LI 

NHA:" ;ERL:GOTO 230 

220 IF ERL=610 THEN PRINT : PRINT" Arquivo nao existe" : CLOSE : PRINT : 

PRINT"Tecle algo" :T$=INPUT$ (1 ): RESUME 560 

230 CLOSE : PRINT: PRINT"Tecle algo" : T$=INPUT$ (1 ): RESUME 80 

240 CLS: PRINT"OPCAO PARA IMPRESSAO DE CABECALHO" 

250 LOCATE, 5: PRINT"Conf irma impressao de cabegalho (S/N) ?";:C$= 

INPUTS (1) 

260 IF C$="N" OR C$="n" THEN A$="NAO" : GOTO 80 ELSE IF C$="S" OR 

C$="s" THEN A$="SIM" : GOTO 270 ELSE 240 

270 LOCATE0, 7:PRINT"Digite o cabegalho (m^x.:55 caracteres) " 

280 LINE INPUT D$:IF LEN(D$)>55 THEN PRINT : PRINT"Cabegalho com m 

ais de 55 caracteres" : PRINT"Tecle algo" ELSE IF D$="" THEN 270 E 

LSE 80 

290 T$=INPUT$(1) :GOTO 240 

300 CLS:PRINT"OPCAO PARA IMPRESSAO DE RODAPfi" 

310 LOCATE0 , 5: PRINT"Conf irma impressao de rodap<§ (S/N) ?";:C$ = IN 

PUT$(1) 

320 IF C$="N" OR C$="n" THEN B$="NAO" : F1=0 : L$="NAO" : GOTO 80 ELSE 

IF C$="S" OR C$="s" THEN B$="SIM" :GOTO 330 ELSE 300 
330 LOCATE0 , 7:PRINT"Digite o rodap6 (m3x.:55 caracteres)" 
340 LINE INPUT E$:IF LEN(E$)>55 THEN PRINT : PRINT"Rodapt5 com mais 

de 55 caracteres" : PRINT"Tecle algo" ELSE IF E$="" THEN 300 ELSE 

360 
350 T$=INPUT$(1) :GOTO 300 

360 LOCATEO, 11 :PRINT"Incliii numeragao (S/N) ?" ; 

370 C$=INPUT$(1) :IF C$="N" OR C$="n" THEN F1=0 : F2=0 : L$="NAO" : GOT 
O 80 ELSE IF C$-"S" OR C$="s" THEN Fl=l : F2=0 : L$="SIM" :GOTO 80 EL 
SE 360 

380 CLS:PRINT"OPCAO PARA NUMERACAO DAS PAGINAS" 
390 LOCATEO , 5 :PRINT"Conf irma nova paginagao (S/N) ?" ; 
400 C$ = INPUT$(1) :IF C$=»"N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 
$="s" THEN 410 ELSE 390 

410 LOCATEO, 7 : PRINT"Di gi te para nao numerar paginas." 
420 LOCATEO, 9 :INPUT"Qual o novo ntfmero da pagina " ;A 
430 IF A=0 THEN F2 = : L$="NAO" : F5 = -.GOTO 80 ELSE IF A>0 THEN F2 = l 
:L$="SIM":R=A:F5=l:GOTO 80 ELSE 420 
440 CLS:PRINT"OPCAO PARA OFFSET DE IMPRESSAO" 

450 LOCATEO ,5 :PRINT"Conf irma redefinigao de offset (S/N) ?" ; 
460 C$=INPUT$(1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 
$="s" THEN 470 ELSE 450 

470 LOCATEO , 7 : INPUT"Qual o novo offset de impressao ";B 
480 IF B>0 AND B<17 THEN 80 ELSE IF B<0 THEN LOCATEO , 7 : PRINT SPA 
CE$(39) :GOTO 470 

490 LOCATEO, 11 : PRINT"CUIDADO : offset alto. Redefine (S/N) ?"; 
500 C$=INPUT$(1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 
$="s" THEN 470 ELSE LOCATEO , 11 : PRINT SPACES (39) : GOTO 490 
510 CLS:PRINT"OPCAO PARA N' DE LINHAS/PAGINA" : LOCATEO , 2 : PRINT"Ma 
ximo aceito pelo programa: 55" 

520 LOCATEO, 5 :PRINT"Conf irma novo no de linhas/pdg. (S/N) ?"; 
530 C$=INPUT$(1) :IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 
S="s" THEN 540 ELSE 510 

540 LOCATEO, 7: INPUT"Qual o n2 de 1 inhas/p^gina ";C 
550 IF C<0 OR C>55 THEN LOCATEO , 11 : PRINT"NUmero de 1 inhas/pagina 
ilegal":GOTO 540 ELSE 80 
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MELHORES 
PRECOS, 

ATENDIMENTO E 
QUALIDADE. 



- DRIVE 51/4 PARA MSX 

- DISKETTES 5V4 - 'VERBATIM OU NASHUA" 

- PORTA-DISKETTE 

- IMPRESSORAS 

- MONITORES 

- CAPAS E CABOS 

- FORMULARIO CONTINUO 

- ESTABILIZADORES 

- FITA PARA IMPRESSORA MTA. 

LIVROS TECNICOS E 
REVISTAS-NACIONAIS E ESTRANGEIROS 



Of 



CIENCIA MODERNA COMPUTAQAO LTDA. 



Matriz: Av. Rio Branco, 156 - Loja ss 127 Filial: Rua do Catete, 311 - Filial: Av. Rio Branco, 156 - Sobreloja 217 

(Subsolo) - CEP: 20043 Lojas 108 e 311 • H Tels.: (021) 262-3906 / 220-0451 

Tel.: (021) 262-5723 - Rio de Janeiro - RJ Tel.: (021) 205-9747 - Rio de Janeiro - RJ Rio de Janeiro - RJ 



560 CLS:PRINT"OPCAO DE IMPRESSAO DE ARQUIVOS-TEXTO" 

570 LOCATE0, 2:PRINT"Indique o drive (A/B) ";: F$=INPUT$ (1 ): PRINT 

F$: PRINT -.PRINT 

580 IF F$="A" OR F$="a" THEN FILES"A:" ELSE IF F$="B" OR F$="b" 

THEN FILES "B:" ELSE 570 

590 PRINT: PRINT :PRINT"Nome do arquivo : (<RETURN> sai da opgao) " 

600 LINE INPUT G$:IF G$="" THEN 80 ELSE G$=F$+CHR$ (58) +G$ 

610 OPEN G$ FOR INPUT AS #1 

620 CO=1:F4=0:A=1: PRINT: PRINT"Comega impressao na p^gina (1): "; 

630 INPUT CO: IF CO=0 THEN CO=l:A=l ELSE IF CO=2 THEN A=2:CO=l:F4 

=1 ELSE IF CO>2 THEN A=CO:CO=CO-l ELSE IF CO<0 THEN PRINT : PRINT" 

Valor ilegal":GOTO 620 

640 TE=20: PRINT :PRINT"Termina na pagina (Ultima): ";: 

650 INPUT TE:IF TE<CO THEN TE=CO+l ELSE TE=TE+1 

660 IF F5=l THEN PRINT : PRINT"Numeragao redefinida para :" ;R : PRINT 

"Confirma (S/N) ?" ; ELSE 700 

670 C$=INPUT$(1) :IF C$="S" OR C$="s" THEN A=R:GOTO 710 ELSE IF C 

$ = "N" OR C$="n" THEN 680 ELSE 660 

680 PRINT :PRINT"Abandona impressao (S/N) ?;" 

690 C$ = INPUT$(1) :IF C$="S" OR C$="s" THEN 80 ELSE IF C$*="N" OR C 

$="n" THEN 710 ELSE 680 

700 PRINT: PRINT"Pausa entre as p^ginas (S/N) ?" ; 

710 C$=INPUT$(1) :IF C$="S" OR C$="s" THEN F6=l ELSE IF C$="N" OR 

C$="n" THEN F6=0 ELSE 700 
720 PRINT: PRINT" Prepare a impressora e tecle algo" ; : T$=INPUT$ (1 ) 
730 CLS: PRINT" [ESC] = sai da impressao" : PRINT : PRINT" [ STOP ] = pau 
sa/continua" 

740 IF CO>l OR F4=l THEN GOSUB 980 
750 REM INICIA IMPRESSAO 

760 IF A$="SIM" THEN LPRINT TAB(B);D$ ELSE LPRINT 
770 LPRINT 

780 X$=INKEY$:IF X$=CHR$(27) THEN CLOSE:GOTO 80 
790 FOR 1=1 TO C 

800 IF EOF(l) THEN CLOSE : F3=l : GOTO 860 
810 X$=INKEY$:IF X$=CHR$(27) THEN CLOSE:GOTO 80 
820 LINE INPUT#1,H$ 
830 GOSUB 1030 
840 LPRINT TAB(B);K$ 
850 NEXT I 
860 K=I-1 

870 FOR L=l TO 55-K : LPRINT : NEXT L 
880 IF B$="SIM" THEN LPRINT TAB(B);E$;" "; 
890 IF Fl=l THEN LPRINT" Pdg .:"; A : GOTO 910 
900 IF F2=l THEN LPRINT TAB(39);A 
910 A=A+1 

920 IF F3=l THEN F3=0:LPRINT CHR$ (12 ) : GOTO 80 
930 LPRINT CHR$(12) 

940 IF F6=l THEN LOCATE0 , 5 : PRINT"Tecle algo para cont inuar " ; : T$= 

INPUTS (1) 

950 IF A=TE THEN CLOSE:GOTO 80 ELSE 750 

960 CLS: PRINT"Conf irma saida do programa (S/N) ?"; 

970 C$=INPUT$ (1) : IF C$="N" OR C$="n" THEN 80 ELSE IF C$="S" OR C 

$="s" THEN END ELSE 960 

980 FOR 0=1 TO C*CO 

990 IF EOF(l) THEN CLOSE : GOTO 80 
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1000 LINE INPUT#1,H$ 

1010 NEXT 

1020 RETURN 

1030 I$="":K$="" 

1040 FOR X=l TO LEN(HS) 

1050 I$=MID$(H$,X,1) 

1060 IF X=l THEN 1240 

1070 IF I$=CHR$(192) THEN I$=CHR$(27) 

1080 IF I$=CHR$(193) THEN I$=CHR$(27) 

1090 IF I$=CHR$(194) THEN I$=CHR$(32) 

1100 IF I$=CHR$(195) THEN I$=CHR$(27) 

1110 IF I$=CHR$(196) THEN I$=CHR$(20) 

1120 IF I$=CHR$(197) THEN I$=CHR$ (14) 

1130 IF I$=CHRS(198) THEN I$=CHR$(18) 

1140 IF I$=CHRS(199) THEN I$=CHR$(15) 

1150 IF I$=CHR$(200) THEN I$=CHR$(27) 

1160 IF I$=CHR$(201) THEN I$=CHR$(27) 

1170 IF I$=CHR$(202) THEN I$=CHR$(27) 

1180 IF I$=CHR$(203) THEN I$=CHR$(27) 

1190 IF I$=CHR$(204) THEN I$=CHR$(27) 

1200 IF I$=CHR$(205) THEN I$=CHR$(27) 

1210 IF I$=CHR$(206) THEN I$=CHR$(27) 

1220 IF I$=CHR$(207) THEN I$=CHR$(27) 

1230 K$=K$+I$ 

1240 NEXT X 

1250 RETURN 



+CHR$(53) Imp .Enfatizada 
+CHR$(52) Desativa Enfatiz. 

FF ==> espaco 
+CHR$(84) Des .Ind ./Expoente 

Desat .Expansao 

Expandido 

Desat Condensacao 

Condensado 
+CHR$ (45)+CHR$ (0) Des.Subl. 
+CHR$ (45)+CHR$ (1) Sublinhado 
+CHR$(54) Courier Residente 
+CHR$(55) Qual .Carta (RAM) 
+CHR$(72) Desat Qual .Carta 
+CHR$(71) Qualidade Carta 
+CHR$(83)+CHR$(1) Ind ice 
+CHR$(83)+CHR$(0) Expoente 



Figura 2 - 



Programa para paginar arquivos-texto do MSX-WORD in- 
cluindo os comandos de impressora (listados na figura, 
em it^lico, nao fazendo parte do programa). 



10 DEFFNP(X)=PEEK(X)+256*PEEK(X+1) :KEY OFF 

20 CLS:PRINT"Impressao do texto por pdginas":TE 

64+. 9) 

30 LOCATE0, 2: LINEINPUT"Numera pdginas ? (<CR> = 

THENF6=1 : PA=lELSEIFA$="N"ORA$="n"THENF6=0 :G0T06 

40 IFF6=lTHENLOCATE0,3:PRINT"Numeragao atual e: 

ine (S/N) ? " ; :0$=INPUT$ (1) : PRINTO$ : IFO$="S"ORO 

O$="N"ORO$="n*'THEN60ELSE40 

50 LOCATE0, 5 : PRINT"Ind ique a nova numeragao: 

60 LOCATE0, 7 :LP=55:PRINT"N9 de 1 mhas/p^g . : " ; LP 

Redefine (S/N) ? " ; : 0$=INPUT$ (1) : PRINTO$ : IFO$=" 

LSEIFO$="N"ORO$="n"THENLP=55:GOTO80ELSE60 

9:PRINT"N2 de linhas/pdg. (max: 60): 



70 LOCATE0 
0THEN70 
80 LOCATE0 
90 LOCATE0 



= INT(FNP(&.HC2F1)/ 

S ) ";A$:IFA$="" 
0ELSE30 

" ;PA: PRINT"Redef 
$="s"THEN50ELSEIF 

:INPUTPA 

: LOCATE0 t 8 : PRINT" 

S"ORO$="s"THEN70E 

" ; :INPUTLP: IFLP>6 



ll:Pl=l:INPUT"P^gina inicial (<CR>=1 
12:P2 = INT(TE/LP)+l:INPUT"Pa'gina f ina 

P2 : IFP2<P1THEN90ELSEIFP2=0THENP2=1 

100 LOCATE0,14:PRINT"Pau3a na impressao (S/N) ? 

PRINTO$:IFO$="S"ORO$="s"THENF7=lELSEIFO$="N"ORO 

100 

110 LOCATE0,16:CO=l:INPUT"Quantas cdpias (<CR>=l)";CO 



)";P1 

1 (<CR>=iiltima) " ; 

" ; :0$=INPUT$ (1) : 
$-"n"THENF7=0ELSE 
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120 


LOCATE0 , 18 :PRINT"Prepare a impressora e tecle algo . " : LOCATE0 


,19 


PRINT"Se desejar, tecle D para desistir" ; : GOSUB430 : CLS 


130 


FOR 0=1 TO CO 


140 


IF 0>1THEN LP=LP+1 


150 


IF Pl=l THEN LI=1 ELSE IF P1>1 THEN P1=P1-1 : LI=P1*LP+P1 : Pl= 


Pl + 1 


160 


V=PA: LP=LP-1 


170 


LOCATE0, 0: PRINT" IMPRIMINDO ARQUIVO TEXTO: " 


180 


LOCATE0,5:PRINT"Cdpia n2";0 


190 


LOCATE0 , 15 : PRINT"Tecle [ESC] para abandonar impressao" : LOCAT 


E0, 16: PRINT" [STOP] para pausa/continuagao" 


200 


FOR P=P1T0P2 


210 


L0CATE15,5:PRINT"Pagina ";P 


220 


E$=INKEY$:IF E$=CHR$(27) THEN 420 


230 


LPRINT 


240 


LF=LI+LP:U=0 


250 


FOR I=LI TO LF 


260 


E$=INKEY$:IF E$=CHR$(27) THEN 420 


270 


C=64* (INT(I-l) ) :B = C+FNP(&.HD501) : X=8.HA36A: GOSUB440 


280 


B= (64*INT(I) ) -C:X = &.HA36D:GOSUB440 


290 


A=USR5 (A) 


300 


LPRINTCHRS (13) :U=U+1 : LOCATE0 , 10 ,0 : PRINT" Li nhas : " ;U 


310 


IF I=TE THEN I=LF 


320 


NEXT I 


330 


LI=I :LF=0 


340 


U=U+1 


350 


F0RL=1T061-U: LPRINT :NEXTL 


360 


IFF6=1THENLPP.INTTAB(39) ;V 


370 


V=V+1 


380 


LPRINTCHR$(12) 


390 


IFF7=lTHENLOCATE0. 18:PRINT"Tecle algo para cont inuar" : LOCATE 


f 19:PRINT"ou D para desist ir" -.GOSUB430 


400 


NEXT P 


410 


NEXT O 


420 


RUN"MSXWORD3.0" 


430 


T$=INPUT$ (1) : IF T$="D"ORT$="d"THENT$=" " : GOT0420 ELSE RETURN 


440 


P0KEX,B-256*INT(B/256) : POKEX+l , INT (B/256) : RETURN 


Figura 3 Programa "PAGINA.BAS" para ser adicionado ao disco de 




trabalho do MSX-WORD e rodado junto com o programa. 



SUN PHOTO INFORMATICA 

O MAIS COMPLETO SORTIMENTO DE SOFTWARE PARA MSX 



• DRIVE DDX51M 720 KB • 
NOVO UNQAMENTO - VENDA • 
EXCLUSIVA • 

• DRIVES DDX TIPO B • 

• CARTAO 80 COLUNAS • 

• GABINETE P/DRIVE COM FONTE 

DESPACHAMOS PARA TODO O BRASIL 



DISQUETES 

INTERFACE DUPLA P/DRIVE 

ARQUIVOS P/DISQUETES 

MONITORES 

FORMULARIOS 



sunphoro 



A CASA DO 

MSX DE FORTALEZA 



Rua Torres Camara, 440 - Aldeota -CEP. 60150 
Fortaleza - CE *** Fone: (085) 244-2308 
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Linguagem 






A mais avancada linguagem de computacao para criancas 

Estimula o 
desenvolvimento 
intelectual da 
crianga 








HOTLOGO 



A melhor e mais completa versao 
do Logo.voce encontra na 
ORIONSOFT. 

Atengao escolas, entrem em 
contato conosco, temos pregos 
especiais. 

O livro HOTLOGO da Editora 
Aleph acompanha gratuitamente 
cadacartucho 



Para comprar pelo correlo envle cheque cruzado no valor 
de 100 BTNF's do dia do envlo do pedldo para a Orlonsofl. 
Nao trabalhamos com vale postal ou reembolso postal. 



ORIONSOFT 

Rua Alves Guimaraes, 519- Pinheiros - Tel. (011)881-9204 
CEP 05410 - Sao Paulo - SP 

"Proximo ao HOSPITAL DAS CLINICAS" 



POR DENTRO DA 
INTERFACE DE DRIVE 



JULIO VELLOSO 



A principal dificuldade no desenvol 
vimento de programas profissionais estd 
em relacao a gravacao e leitora de ar 
quivos. 

Tenho visto em diversos profissionais 
e em quase lodos os programas que 
lidam com drive, (urn bom editor de tex 
to ou Page Maker) a impossibilidade de 
poderem evoluir por causa de urn acesso de 
drive lento ou por nao poder acessd lo 
de forma direta. 

Baseado nesta dificuldade, elaborei 
um metodo de acessar o drive com 
quase o dobro de sua rapidez e de forma 
a noo precisar acessar nenhuma rotina 
do BDOS, suprimindo esta dificuldade. 

Apresenlarei nesle primeiro artigo 
sobre interface de drive, a base de 
conhecimenlo que julguei necess6rio 
para o entendimento dos proximos or 
tigos que em conjunto fordo um impor 
tanle e abrangente documenlo a res 
peito desle periferico. 

AS ROTINAS BASICAS 
DO DRIVE 

Quern jd comprou o Livro Vermelho da 
editora Mac Graw Hill jd deve ter notado 
a existencia de duas rotinas que estdo 
mencionadas no livro e que nao tern des 
cricao. Sao elas as rotinas de nome FOR 
MATePHYDIO. 

A ROTINA PHYDIO 

A rotina (PHYDIO) 6 a mais importan 
te. Com ela se pode fazer qualquer 
operacao em relacao a drive (reno 
meacao, grovacao, leitura etc) 

PHYDIO (144H ou FFA7H): Le ou grava 
um ou vdrios setores no disco que po 
der6 estar em qualquer dos drives (A, B, 
CeD). 

Entrada: 
HL: um endereco na memoria (0000H a 
FFFFH) 



DE: setor inicial a partir do qual co 
mecard a leitura ou gravacao: 

0a719 — 80Tr face simples. 
a 1439 80Trfacedupla. 
a 359 — 40Tr face simples. 
0a710 — 40Tr facedupla. 

B: numero de setores a serem lidos ou 
gravados. 

C: tipo de formatacao: 1111 1 TOF B 

T: 1 — 40trilhas 
0—80 trilhas 

F: 1 — face dupla 

— face simples 

F (flag C): operacao a ser realizada: 

— leitura de um setor 

1 — gravacao de um setor 

A: drive onde serd realizada a opera 

cao. 

— drive A, 

1 — drive B 

2 — drive C, 

3 - drive D 

Os enderecos seguintes ao especi- 
ficado por HL deverao confer o setor que 
serd gravado caso a operacao que se 
deseja efetuar se|a uma operacao de 
gravacao (flag C setoda). O buffer apon 
tado por HL deverd ter o comprimento 
de 512 bytes (que e o tamanho de um 
setor). 

Saida: 

F (flag C): indica se ocorreu erro na 
operacao: 

setada — sucesso. 
resetada — fracasso. 

A: indica o tipo do erro ocorrido: 

zero — disco protegido 

nao zero — Erro de E/S. 



A ROTINA FORMAT 



Ponto de entrada — 147h ou FFACH: 
depois de chamada a rotina serd 
apresentado para voce um quadro de 
perguntas que deverao ser respondidas. 
para que a rotina saiba que formatacao 
serd efetuada. 

Voce poderd chamar esta rotina em 
um ponto interna dela,caso voce saiba 
qual e este ponto, ou tenha uma inter 
face do tipo Microsol. 

Esta chamada possibilitard a voce 
pre estabelecer o tipo de formatacao, 
sem ter que entrar no quadro de pergun 
-tas. 

Para islo, voce deverd entrar com a 
seguinte rotina em linguagem de md 
quina: 



LDHL.8088H 
LDDE, 51H 
LD BC.6015H 
LDA, (0FFA8H) 
LD(SLOT), A 
LD A, tipfor 
RST30H 

SLOT :NOP 

PNTINT :DEFW401CH 
RETNC 
DEC A 
SLA A 
LDE.A 
LDD.O 

LD HL, TABERR 
ADD HL,DE 
LDA, (HL) 
INC HL 
LDL. (HL) 
LDH.A 
EXDE.HL 
LDC.9 
CALL 5 
RET 
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A DATASET 
ACABA DE CHEGAR!! 

VRROOOM. 



Instalada na Zona Franca de Ma- 
naus, com cota de importacao li- 
berada pela SUFRAMA para 1990, 
a DATASET trara do Japao p/Ma- 
naus, as ultimas novidades do 
mundo MSX. 



SOFTWARE 



EASY WORKING PHILLIPS 

Sistema integrado superior ao LOTUS 123 do PC. 
Possui ainda calendano, calculadora, etc. 
Somente p/MSX2 com 128kb MEMORY MAPPER. 

FOCUS TOOLS DISK MSX2 

Super copiador indispensavel na sua colecao. 
Usa os 128Kb da VRAM. Faz analise de disco. 

MSX-C LIBRARY ASCII 

O compilador da linguagem C definitivo p/MSX. 
Comandos graficos e sonoros que possibilitam 
usar todos os recursos que o hardware dispoe. 

MSX-C LIBRARY ASCII 

Colecao de programas-fonte em lingugem MSX-C. 

SIDE QUICK ROM TALENT 

Calculadora-Calendano-Reldgio andlogo, etc. 
Somente para MSX2/MSX2+. 





Escreva-nos. Temos um Centra 
de Apoio ao usuario a sua dispo- 
slcao para qualquer diivida em 
relacao a hardware ou desenvol- 
vimento de software. Fique por 
dentro do padrao MSX. 
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HARD DISK INTERFACE ASCII 

Controladora de Disco Rfgido: 20MGb e 40 MGbytes. 

IMPRESSORA PANASONIC KX-P1180 

Formulario contfnuo ou Folha Solta. 80 colunas. 

Compatibilidade total com MSX, inclusive a nfvel 

de acentuacSo. Recursos de CORRIER e BOLD PS. 

256-MSXDOS2 ROM ASCII 

Cartucho contendo Sistema Operacional MSXDOS2, 
compatfvel com MS-DOS 2.1 + 256Kbytes de 
Memory Mapper. S6 para MSX2/MSX2+. 

Disquetes 3 1/2" SONY-MAXWELL-ETC. 

PROGRAMAS ORIGINAIS KONAMI 

Nemesis II, Salamander, F1 Spirit, 
F1 -Spirit 3 Special 



Para maioras informacdes: 

Escreva para R . Luiz Antony, 223 Centra CEP 69007 M AN AUS / AM ou ligue para (092) 232-1531 . Temos um fax nesta linha p/seu conforto. 



■ 



TABERR: 

DEFW ERRM1. ERRM2, ERRM3. ERRM3 
DEFW ERRM3, ERRM3, ERRM4. ERRM5 
DEFW ERRM3 

ERRMI :DEFB "Disco protegidoS" 
ERRM2 :DEFB "Ndo prontoS" 
ERRM3 :DEFB "Erro de discoS" 
ERRM4 :DEFB "Parametro invdlidoS" 
ERRM5 ;DEFB "Memoria insuficienteS" 

Se tudo liver correto, depois da 
charnado desta rolina a interface co 
mecard a tormatacao. Caso conlrario, ela 
emitira uma mensagem de erro. 

Na rotina: 

A rotina de impressao usada e a do 
BDOS. A sua luncao esta descrita na 
tabela em anexo. 

tipfor — conlerd o tipo de tormatacao 
desejada: 

1 (ace simples 40 Irilhos 

2 laco dupla 40 trilhas 

3 lace simples 80 trilhas 

4 — lace duplo 80 trilhas 

PNTINT — Neste local terd que exislir o 
ponlo de entrada interna da rolina No 
caso das interlaces padrao Microsol. o 
ponto jd estd pre determinodo. 

CONFIGURAQAO INTERNA 
DOS DRIVES 

Para que se possa mexer com a rotina 
PHYDIO e bom entender como estd 
dividido o disco em todos os lipos de 
drive. 

A seguir darei umo descricao deslas 
paries, para todos os modelos de drives 
conhecidos: 

FORMATACAO: F8 3 I '2 Face sim 

pies 

SETOR: 0a719ou0a 2CEH 

CLUSTER: a 354 ou a I67H 

1 CLUSTER: 2 setores 

FAT//1: l°selor 

FAT #2: 3°selor 

DIRETORIO: 5° setor 

AREALIVRE: 12ao719 

N°D£ TRILHAS: 80 

Tamanho da FAT: 2 selores 

Tamanho do diretorio: 7 setores 

N° de programas por diretorio: 112 
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FORMATACAO: 

dupla 

SETOR: a 1439ou0a49CH 

CLUSTER:0a718ou0a2CEH 

1 CLUSTER: 2 setores 



Face 



FAT#1: l°setor 
FAT #2: 4° setor 
DIRETORIO: 7° setor 
AREA LIVRE: 14 ao 1439 
N°DE TRILHAS: 80 
Tamanho da FAT: 3 setores 
Tamanho do diretorio: 7 setores 
N° de programas por diretorio: 1 1 2 

FORMATAQAO: FC 5 1/4 - Face sim 

pies 

SETOR: 0a354ou06 167H 

CLUSTER:0a354ou0o 167H 

1 CLUSTER: 1 setores 

FAT/M: 1° setor 

FAT #2: 3° setor 

DIRETORIO: 5° setor 

AREA LIVRE: 9 ao 354 

N° DE TRILHAS: 40 

Tamanho da FAT: 2 selores 

Tamanho do diretorio: 4 setores 

N° de programas por diretorio: 64 

FORMAIACAO: FD 5 1/4 - Face 

dupla 

SETOR:0a719ou0a2CEH 

CLUSTER: a 354 ou a 167H 

1 CLUSTER: 2 setores 

FAT:#1: 1° selor 

FAT U7: 3° selor 

DIRETORIO: 5° setor 

AREALIVRE: 12ao719 

N°DE TRILHAS: 40 

Tamanho da FAT: 2 setores 

Tamanho do diretorio: 7 setores 

N°de programas pordiretorio: 112 

DESCRICAO DAS PARTES 
DE UAA DISCO 

BOOT DO SISTEMA: Responsdvel pela 
cargo inicial do DOS. 

FAT 1: Local onde se enconlra uma tabela 
com a relacoo das partes (clusters), que estao 
sendo usados pelos arquivos do disco. 

FAT2:C6pia da FAT 1. 

DIRETORIO DE NOMES: Local onde se 
encontram: nomes. extensoes. lama 
nhos, clusters iniciais da FAT, datas e 
boras de criacdo, que juntos lormarao 
dados imporlantes para os arquivos. 

AREA DE TRABALHO: Local onde esldo 
os arquivos guardados no disco. 
AREA LIVRE: Local livre para os ar 

quivos a serem criados. 

AS FUNCOES DO BDOS 

O usuario \a deve estar pensando 
como o DOS acessa um arquivo, jd 



que so as rotinas anteriores nao pos 
sibilitam a identiticacao de que clusters 
se deverd carregar, ou para onde se des 
tinard os que serao gravados, para com 
por ou gerar um arquivo. 

Para fazer este tipo de operacao, o 
usudrio deverd chamar o BDOS 
(Basic Disck Operation System), que sao 
um conjunto de rotinos. Para acessd las, 
deverd se ter no registrador C um 
niimero, que contera a identilicocoo da 
rotina antes da chamada do endereco de 
niimero 5: 

LD C, niimero de rotina 

CALL 5 

O usuario deverd, baseado nos va 
lores de entrada o saida. montar um 
programa em assembler, juntando as 
diversas rotinas exibidas na tabela. 

Duas rotinas descritas na tabela. pelo 
simples molivo dos perilericos nao exis 
lirern, se tornam nulos. Sao os casos das 
rotinas de niimero 3 e 4 para a leitora e 
perfuradora de cartoes. 

Nas demais rotinas, existe uma legen 
da em anexo, para os diversos tipos de 
dados, que deverdo ser entrados nos 
respeclivos regislradores, para que 
(ique legivel ao usudrio, como usar as 
rotinas descritas 

Na tabela em anexo existe umu men 
Cdo ao endereco do DMA (Disk Memory 
Acess). Esta relere se ao local da me 
morio onde algumas rotinas do BDOS 
pegarao ou colocarao as informacoes do 
ou para o processamento. 

Em todas as rotinas do BDOS, excelo 
oquelas que lidam com o registro ran 
ddmico, o FCB deverd ser preenchido 
ate a posicao 1 1 . Nas outras posicoes da 
FCB, os conteudos deverao ser preen 
xidos com zero: 

FCB: DB0 

DB"NOMEPGM EXT' 
DB 0,0,0, 0,0,0, 0,0, 0. 
DB 0,0. 0,0, 0,0,0.0,0,0 
DB0. 0, 0.0, 

REFERENTE A TABELA 

As rotinas marcadas com um asterisco 
(*) nao estao presentes na ultima ver- 
sdo do cartucho da Microsol. 

A rotina de escrita randdmica de 
bloco se comporta do mesmo modo que 
a 27, exceto pela operacdo de escrita e 
indicac,rio de disco protegido. 

A rotina de escrita randomicas com 
zeros tunciona do mesmo modo que a 
rotina 22h. exceto que, sempre quando 
uma escrita elimina um arquivo de for 
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AGORA VOCE JA PODFRA PASSAR TODOS OS SEUS PROGRAMAS EM FITA 

PARA DISCO, SEM OS VELHOS PHOBLEMAS QUE OCORREM COM OUTROS 

COPIADORES. ACOMPANHA MANUAL DE UTILIZACAO E DISCO. 

Solicit* o mu TRAFIC" hoJ» miimo 
•tr«v4» d« corr»spond*ncla ou rsllra pessoalmtnt* 

■ Preco de lancamento: NCzS 104,00 ■ Taxa de correio inclusa 
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Rua Dr. Cesar , 131 

Metro Santana-S.Paulo/SP 
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hex 



9 

OA 

OB 

oc 

OD 
OE 

OF 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
1A 
IB 
1C 
ID 
IE 
IF 
20 

21 
22 
23 
24 
25 
26 

27 

28 
29 
2A 



2B 

* 20 

2D 

2E 
2F 

30 



Inicioliza o CP/M 

Le um caracter do console (CON) 

Envio um coracter oo console (CON) 

Le um coracter da leitora (RDR) 

Envia um caracter a perfuradoro (PUN) 

Envia um caracter 6 impressoro (LST) 

Entrada direta no console 

Saida direta no console 

LeolOBYTE 

PreencheolOBYTE 

Imprime string 

Le o buffer do console 

Verifica o estado do console 

Fornece o numero da versao em uso 

Inicioliza as unidades de disquetes 

Seleciona drive para uso 

Abre arquivo 

Fecha arquivo (atualiza diretorio) 

Procura primeira ocorrencio 

Procure proximo ocorrencio 

Elimina arquivo 

Leitura sequencial de um regislro 

Escrita sequencial de um registro 

Criacao de um arquivo 

Altera o nome de um arquivo 

Indica os drives que eslao ativos 

Fornece o drive corrente 

Indica enderec.o do DMA 

D6 o enderec.o do mopa de alococao 

Protece o disquete contra gravacao 

Indica as unidodes protegidas 

Designa atributos (DIR, SYS, R/O, R/W) 

Endereco da tabela de parametros 

Define o codigo do usu6rio (0..31 ) 

Obtem o cbdigo do usudrio (0..31 ) 

Leitura randomica de um registro 

Escrita randomica de um registro 

Tamanho do arquivo (em setores) 

Posicao randomica do registro 

Reinicio de drive 

Escrita randomica de bloco 

Leitura randomica de bloco 

Escrita randomica com zeros 
Nao implementada 
Retorna a Data 



Modifica a Data 

Retorna a Hora 

Modifica Hora 

Verificac.60 de escrita 
Leitura de setores 



Escrita de setores 



Entrada 



E = CODASC 

E = CODASC 
E = CODASC 
E = FFH 
E = CODASC 

E = BYTE 
DE = STRING 
DE = BUFFER 



E = NDRV 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 
DE = FCB 



DE = FILERAM 



DE = FCB 

E = BYTE 
E = FFH 
DE = FCB 
DE = FCB 
DE = FCB 
DE a FCB 

DE = FCB 

HL = contador 
DE = FCB 
HL = contador 
DE = FCB 



HL - ano 

DE = mes/dia 



HL = hora/dia 
DE — seg/c. seg 

DE = setor 
HL = 00/N°set 
DE = setor 
HL = 00/N°set 



Saida 



A = CODASC 
A = CODASC 

A = BYTE 
A = BYTE 



no buffer 
A= ERRO 1 
HL = versao 



ERR02 

ERRC-2 

ERR02 

ERR02 

ERR02 

ERR02 

ERR03 

ERR03 

ERR03 

HL = LIGDRV 

A= NDRV 

HL = END 

HL = LIGDRV 
A = ERR02 

HL = END 

A = BYTE 
A= ERR04 
A= ERR04 
no FCB 
no FCB 

A = ERR03 

A = ERR03 

A = ERR04 

HL = ano 

DE = mes/dia 

A = semana 



HL = hora/min 
DE = seg/c. seg 



A = ERR03 
A = ERR03 

A = ERR03 



ma descontinua, o espaco intermediario 
e preenchido corn zeros. 

A seguir opresento a legenda reteren 
cioda anteriormente: 

CODASC codigo asc para caracter 
(varia de a 255) 

ERROI 00: inativa 

FF: caractere disponivel 

ERR02 — FF: arquivo nao encontrado 
00.. .03: atributo do arquivo 

encontrado (DIR, SYS. R O 
ouR W 

ERR03 00: operac5o OK, 

00: encontrou fim de arquivo 

(leitura) 
: disco cheio (gravacao; 
: diretorio cheio (criacao de 

arquivo) 
: erro de escrita (verificacao 

de escrita escrita setores) 
: erro de leitura (leitura de 

setores) 

ERR04- 00: operacao OK 

01: tentativo de ler um registro 

que nao f o i grovado 
02: nao usado 
03: nao pode techar tensao 

corrente. 
04: tentativa de ler uma exten 

sao nao gravada. 
05: diretorio cheio. 
06: leitura ap6s titn do disquete. 

FCB— endereco inicial da FCB (File 
Control Block): 

00: drive —00 = corrente, 1=A 
2 = 8,...) 

01 ...08: nome do arquivo 
09... 1 1 : extencao do arquivo 

12: numero da extencao 
13. ,.14: 

15: numero de registro nesto exten 
cob. 

16. ..31: relacao dos bloco alocados nes 
to extencao. 

32: proximo regislro a ser lido ou 
gravado nesta extencao. 
33. ..34: numero do registro rando Mico. 

35: indicador de overflow de regis 
tro randomico. 

BYTE valor de 8 bits. 

END — valorde 16 bits (endereco). 

NDRV - numero do drive (0, I, 2, 3 ou 

4). 

FILERAM local onde ser6 ou est6 o 

bloco (128 Bytes) a onde ser6 carregodo 

ou gravado. 

LIGDRU — Corresponde a um numero 

bindrio de 16 posicoes. em que cada 

umo corresponde a um drive, nomeados 

nesta ordem: 



PONMIKJIHGFEDCBA 

xxxxxxxxxxxxxxxx 



Onde: 

X — — desligodo. 
1 — ligado. 
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EntrevistA 



INTONIO NASSER, 

ASengenheiro qui- 
I mico aposentado, 
1 ingressou no cam- 
po da informatica, 
mais especificamente no 
ramo dos micros MSX, 
quase que por acidente. 

Comegando como usuario 
que procura e adquire o 
melhor para seu equipamen- 
to, fundou a MSX SOFT do 
Rio de Janeiro. Evoiuindo 
constantemente, a MSX 
SOFT, hoje, possui uma das 
maiores redes de distri- 
buicao de hardware para 
MSX. 

Nesta entrevista, Nasser nos da a 
chance de avaliar e discutir melhor 
suas ideias, alem de adiantar alguns 
langamentos. 

Ha quanto tempo trabalha com o 
MSX? 

Trabalho com este lipo de equi- 
pamento desde o seu surgimento. 
Alias, a MSX SOFT existe desde essa 
data. 

Voce acha que, hoje em dia, a in- 
dustria de hardware ja oferece tudo o 
que o MSX precisa ou ainda tern al- 
guma coisa a mais? 

Tern muita coisa mais. N6s mes- 
mos estamos pretendendo lancar al- 
gumas novidades em termos de hard- 
ware, juntamente com a DDX. Uma 
dessas novidades que esta prati- 
camente na iminencia de ser comer- 
cializada e urn disco Winchester de 2 
Mbytes para o MSX. Calculo que em 
fevereiro, no maximo em marco, este 
equipamento ja esteja disponivel no 
mercado. 




Independente disto. posso auiantar 
que ainda existe cerca de meia duzia 
de novidades de hardware sendo 
desenvolvidas para o MSX no Brasil. 

Quer dizer que estao tentando 
profissionalizar ainda maiso MSX? 

Sim. Alias, estamos contando com 
todo o suporte da Gradiente, que nos 
fornece qualquer informacao que 
necessitemos sobre o MSX. Apesar 
de mantermos urn relacionamento 
bem estreito com a Gradiente, os 
projetos estao sendo desenvolvidos 
exclusivamente por nos, ou melhor, 
n6seaDDX. 

A MSX SOFT e uma das empresas 
que fazem a transformacao do MSX 1 
em MSX 2. Como funciona este es- 
quema? 

N6s somos uma empresa intima- 
mente ligada com a DDX. Fora a 
Gradiente, poderia ate afirmar que a 
DDX e a segunda empresa nacional 
que mais se dedica ao MSX, no cam- 
po de hardware. Como seus repre- 
sentantes, estamos associados e 
todos esses desenvolvimentos sao 
feitos em conjunto com a DDX. 



Com relagao a transformacao do 
MSX 1.0 para MSX 2.0, simplesmente 
fazemos a instaiacao, pois a placa e 
desenvolvida pela DDX. 

Qual e a reacao, a receptividade 
por por parte do comprador? 

Muito boa e nao temos tido re- 
clamacoes no sentido da utilizacao. 

Entretanto, e preciso saber se vale 
a pena. E lamentavel que a utilizacao 
do MSX 2 seja unicamente voltada 
aos jogos. Em termos de aplicativos, 
de programa profissionais, quase 
nada existe para o MSX 2. Portanto, 
nao vale a pena fazer a transformacao 
se o uso que pretende se dar a ma- 
quina e estritamente profissional. 
Para isso pode-se utilizar a versao 1, 
pois a transformacao por si s6 nao 
profissionaliza mais o computador. 
Para o profissional basta a versao 1 . 

Em termos de hardware, pelo que 
podemos observar, a MSX SOFT 
pode ser considerada uma firma sui 
generis? 

Sim, porque nos e a DDX, inclusive 
posso falar pelas duas, somos in- 
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teiramente voltadas para a linha MSX. 
Nos dedicamos exclusivamente ao 
MSX. Nada que a DDX fabrigue esta 
fora do campo do MSX. Somos es- 
pecializados. A DDX na industria e 
n6s na comercializagao. 

A MSX SOFT atua, tambem, no mer- 
cado de compra e venda de micros 
usados? 



Certa vez, uma empresa pretendia 
usar micros compativeis com o MSX 
como terminais de PC. Entrou em 
contato conosco para que pudes- 
semos adquirir os equipamentos 
usados para tal fim e para avaliar, tam- 
bem, o estado de cada urn, fazendo 
os reparos que talvez fossem neces- 
sarios. 

Anunciamos que estavamos com- 
prando micros usados e, quando ja 
tinhamos cerca de dez computadores 
comprados, a politica de tal empresa 
mudou, o que nos obrigou a ficar com 
as maquinas. 

Com isso, tivemos que vender os 
aparelhos usados, como usados. Foi 
urn bom negbcio mas, lamentavel- 
mente, tivemos que parar, pois nao e 
nossa meta trabalhar com usados. 



Que incentivo a MSX SOFT oferece 
em relacao ao software? 

N6s n5o temos pessoal voltado 
somente ao desenvolvimento pro- 
priamente dito. Trabalhamos com soft- 
ware porque o mercado exige, mas 
nao temos intenpao em desenvolve- 
lo especialmente para empresas e 
afins, mesmo porque nos falta ma- 
terial humano. 

S6 gostamos de fazer as coisas 
bem feitas e e muito dificil encontrar 
pessoas que tenham um conhecimen- 
to profundo do assunto. Quando voce 
desenvolve um programa para uma 
empresa, alem do trabalho para cria- 
lo, existe o suporte e a manutengao 
que, em muitos casos, pode ser inter- 
minavel. Para isso, e preciso pessoal 
especializado que, como disse, nao 
temos. 

O que fazemos nesta area e tra- 
balhar com joguinhos e programas ja 
prontos, como o SuperCalc e o dBase 
II. 

Temos um bom trabalho em soft- 
ware, mas a nossa especialidade, 
hoje, e hardware. 

Caso algum programador procure a 
MSX SOFT, o que ira encontrar? 



Seria bem recebido, mas teria que 
fornecer o suporte necessario ao 
usuario. 

De vez em quando aparecem alguns 
autores, mas que querem apenas 
comercializar o produto, vender e ate 
logo, o que nao aceitamos, porque 
sempre surgem diividas cujo o es- 
clarecimento depende, exclusiva- 
mente, doautor. 

Existe uma grande distancia entre 
o manual e o programa. manual e in- 
suficiente. Ate em programas bem 
documentados, como o dBase II, ha 
casos de diividas e pontos obscuros, 
nao cobertos pelo manual. 

Ja em termos de hardware, temos 
condigbes de dar todo o suporte, pois 
temos todo o conhecimento neces- 
sario paraeste fim. 

Um assunto muito polemico e a 
pirataria. Como vai a pirataria aqui e la 
fora? 

Bem, eu nao conhego pirataria. 
Conhego pessoas que trocam jogos, 
pessoas que vendem jogos e pergun- 
to se isso e pirataria. 

Tambem conhego pessoas que 
recebem jogos, tiram o nome do 
autor e colocam seu prbprio nome. 

Nao sei quern voce classificaria de 
pirata. Se voce considera pirata 
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ALCATRAZ 

FREDDY HARDEST 3 

ZAXXON 

PARIS-DAKAR 

CORSARIO 

CONTRA 

XYBOTS 

DEFCON-4 
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COMPUSOFT INFORMATICA LTDA 

micro Informatlca lovada a sorlo 

Rua das Man-ocas, 40/gr 302 

(junto ao metro 1 Cinelflndia) 

CEP 20031 -RJ 

CAIXA POSTAL 48055 CEP - 20.512 

TEL: 225-1863 



REVENDA AUTORIZADA 

NEMESIS INFORMATICA 
DISCOVERY INFORMATICA 

- ABERTO AOS SABADOS - 




• HELLO ! 

• CONTABILIDADE 

• BOLSA DE VALORES 



* MALA DIRETA * PAGE MAKER * 

* AQUARELA * MSXWORD 3.0 * 

* THE COOK BOOK * TOP CAD * 

* SCREEN STEALER * AGENDA * 

* COMICS ON DISK * BASIC 

* ORQAMENTO DOMESTICO * 

ATENUMENTO PERSONALIZADO 

• DISQUETES NASHUA 

• MONITORES 

• DRIVES 

(TAMBEM EM DISQUETES DE 3.5") 
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aquele que vende programas e 
aquele que coloca o proprio nome, 
entao todos nos somos piratas, pois 
quern nao faz uma coisa, faz outra. 

Entao, quem revende software 
copiado e pirata? 

Sim, porque tais programas nunca 
sao nacionais. Ou sao japoneses ou 
ingleses. Aqueles que revendem 
programas e dizem que sao nacionais 
e porque trocaram o nome do ver- 
dadeiro autor. Se encararmos por 
este angulo, podemos nos consi- 
derar todos piratas 

E quanto aos verdadeiros autores 
nacionais? Nao seriam estes atin- 
gidos mais diretamente, alem de nao 
terem como recorrer? 



Sejam os autores de onde forem, 
brasileiros ou nao, ha direitos envol- 
vidos. 

Mas, neste momento, pergunto 
quem sao os autores brasileiros? 
Voce pode apontar autores brasi- 
leiros autenticos? Mesmo que exis- 
tam, eles estao de maos amarradas, 
como voce mesmo disse. 

Na minha opiniao, o que nao se 
pode fazer nada para corrigir, esta 
certo. Se esta errado, pode-se fazer 
algo para consertar. Esta e a minha 
filosofiade trabalho. 

Pirataria ocorre em todas as areas, 
seja na informatica, no cinema ou na 
musica. Infelizmente, esse negocio 
de direitos nao funciona no Brasil. 

Voce fala de pirataria de software, 
que e mais evidente, mas a pirataria 
de hardware e muito mais grave. 
Todos se preocupam com a pirataria 
de software, criticam, rotulam e nin- 
guem esta atento a pirataria de hard- 
ware, que e muito mais danosa e 
muito mais prejudicial. 

O desenvolvimento de urn equi- 
pamento envolve muita coisa. Uma in- 
dustria que se dispoe a criar algo, 



gasta tempo e dinheiro em tecnicos, 
testes, criacao, adaptagao e tudo 
mais que envolve o lancamento de 
um artigo novo. Quando, finalmente, 
o produto esta no mercado, aparece 
outra empresa, que s6 observou, 
compra o produto na loja, abre e 
copia. Copia literalmente, todos os 
detalhes, desde a embalagem ate o 
manual. Ai esta a pirataria e ninguem 
a chama de pirataria. Ninguem critica 
e e apenas mais um concorrente no 
mercado. Ninguem faz mencao aos 
piratas de hardware. Ja li em cerlas 
revistas sobre o pirata de software, 
mas nada a respeito de piratas de hard- 
were. 



Isto nao poderia ser explicado por 

falta dedivulgacao? 

Todo mundo sabe que existe mas, 
talvez por ser uma industria, as revis- 
tas tenham medo de mexer com eles. 
Tudo bem quando se trata de soft- 
ware, mas, quando e uma industria, 
que pode ter uma organizacao juri- 
dica, nao ha manifestacao. Nunca 
ouvi dizer que alguem tenhaacionado 
esta ou aquela empresa por pirataria. 
Por isso que ainda digo que nao sei 
quem e pirata. 

Qual e o seu ponto de vista do mer- 
cado atual? 

Sinto que o mercado esta bom, 
aquecido. Inclusive, ouvi dizer que 
um novo MSX esta para ser lancado 
em breve por uma firma paulista. 
Tomara que seja verdade, mesmo 
porque parece que eles estao optan- 
do pela fabricagao direta do MSX 2. 
So lamento que a Gradiente- nao 
tenha producao suficiente para aten- 
der a demanda do mercado. 

Se alguem quiser adquirir um com- 
putador para colocar em casa ou no 
escrit6rio, nao ha outra opcao senao 
o MSX. Antigamente, existiam o CP 
400 e o CP 500 da Prol6gica, que nao 
sao mais fabricados. Apple morreu. 
Entao, alem do PC, cujo o inves- 
timento e proibitivo, resta o MSX. 



O lancamento deste novo MSX ja 
tern data? 



S6 sei que um novo MSX, com- 
pativel com a versao 2, esta prepa- 
rado e e s6. 

O novo governo promete fazer uma 
mudanca na area de informatica, o 
que pode amenizar a reserva ou mes- 
mo faze-la cair. Qual e a sua opiniao 
neste assunto? 

Acredito que a reserva de infor- 
matica possa ate cair pois, como dito 
pelo nosso presidente, parece que as 
portas do mercado serao abertas 
para a informatica. Eu nao entendo 
muito de politica, mas acredito que, 
quando voce nao sabe de alguma 
coisa, o melhor caminho e procurar al- 
guem que saiba, ate que voce apren- 
da e nao precise rrrais desta pessoa. 
Acho que, se a reserva terminar, n6s 
vamos aprender muito com os 
americanos, ingleses e japoneses e, 
depois, poderemos produzir sozi- 
nhos, a exemplo do que aconteceu 
com o mercado automobilistico ha al- 
gumas decadas atras. 

Realmente, hoje em dia, a industria 
automobilistica nacional e bem sig- 
nificativa mas, na epoca desta aber- 
tura, varias fabricas nacionais que es- 
tavam surgindo nao aguentaram a 
concorrencia e acabaram fechando? 



Sim, mas eram fabricas que pro- 
duziam carros nao confiaveis, de 
baixa qualidade. Alem disso, a tec- 
nologia desenvolvida aqui e muito 
cara. Quando ha a possibilidade de 
dispor de tecnologia de outro pais, 
fica muito mais barato. Hoje, o Brasil 
produz carros com precos compe- 
titivos ate no exterior, o que possi- 
bilita a sua exportacao. Os compu- 
tadores nacionais custam, uma tor- 
tuna, comparados com os compu- 
tadores estrangeiros, alem de serem 
de baixa qualidade, porque nos nao 
sabemos fazer. 




SOLAR SOFTS-MSX 1&2 



JOGOS APLICATIVOS e UTILITARIOS para o seu MSX. Precos de tirar o fdlego!!! gravagoes 

em discos 5 1/4 ou 3 1/2 (360k ou 720k) ou tambem fitas K-7. 

Para que pagar em Dtn's ou em d6lar ??? pague barato e em cruzados no SOLAR 




SOLICITE LISTA GRATIS 



SOLAR SOFTS SuaSofthouse 
CAIXA POSTAL 1 1 743 CEP - 05090 SP/SP - FONE: (01 1 ) 260-5624 LAPA ' MATR1Z - FONE: (01 1 ) 533-6850 BROOKLIN ' FILIAL 
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Tudo para 
o seu 
MSX 
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Conhega a sofisticagao e magia do Sistema Grafico Aquarela. 

— Recursos completos para edigao de telas graficas. 

— Figuras prontas para voce usar e ilustrar suas telas. 

— Caracteres em Out-Line, bold, sombra no tamanho 8x8 ou 16x16. 



PROMOQAQ KIT2.0DDX 

Nemesis: Top-Cad - MSX Computer Aided Design, ou Desenho Au- 
xiliado por Computador. Mais uma novidade em software prof issio- 
nal que a Nemesis desenvolveu especialmente para o seu MSX! 

JOGOS 

NOVIDADES: Temos os ultimos lancamentos. 

PACOTES: Na compra de 50, 100 e 200 jogos, uma super oferta. 
Consultenos ou peca catalogo gratis. 

PERIFERICOS: Linha completa de perifericos para MSX e PC. 

PROMOCAO: Na compra de um drive, voce ganha um brinde espe- 
cial Pregos abaixo do mercado. 

SUPRIMENTOS: Capas - Porta Disquetes - Disquetes - Livros Espe- 
cificos para MSX (Pregos promocionais com 15% de desconto) - Fi- 
tas para Impressoras. 

SOFTWARE: Educativos - Aplicativos - Utilitarios - Desenvolvemos 
tambem sistemas especificos para empresas. 

KIT PARA DRIVE DDX: Composto de gabinete, metalico com fonte 
de alimentagao, interface DDX com cabo de ligagao para dois dri- 
ves, sistema operacional (DOS) e manual. 

MEGARAM DISK 256: Placa de expansao de memoria de 256 
Kbytes, com o sistema operacional DDX DOS residente. 




LADY 80 



Temos Impressora Elgin Lady 80. 
A Pequena Notavel. 




EVA. 

EDITOR DE VINHETAS AMMAOAS 



rjJlGameofTime 

k^Ad SOFTWARE E HARDWARE 



Av. Jabaquara. 1598/Sala 8 - (Ao Lado do Metro Saude) - Cep 04046 - Sao 
Paulo - SP - Fone: (Oil) 581-2739 




CartaS 




CPM 



Se voce se interessa por pro- 
gramagao profissional, entre para o 
CPM, que vem a ser um clube vol- 
tado apenas para a troca de pro- 
gramas, utilitarios, aplicativos e 
educacionais. Se voce monlou um 
programa do tipo citado acima, en- 
tre tambem em conlato conosco. 

CPM - CLUBE PADRAO MSX 
A/CRONILDO 
CAIXA POSTAL 370- 
AGENCIAGUANABARA 
67000 — ANANINDEUS - PA 



POKES E PEEKS 



Antes de tudo, parabenizo a CPU 
pela qualidade da revista, mas como 
ninguem e perfeito, tenho algumas 
criticas. 

Os usuarios menos privilegiados 
ficam boiando em alguns artigos. 
Acho que os programas editados na 
revista deveriam ter informacoes 
mais tecnicas. Outro problema para 
o leitor e quando falam de pokes e 
peeks. Essa materia deveria ser 
mais comentada, dando mais ex- 
plicacoes sobre sua utilizacao em 
programas. Se nao fosse incomodo, 
gostaria que me mandassem dados 
sobre a linguagem Cobol do MSX. 

MARCELOCASTANHA 
R. JACARAPINHA.345 
02415 -SAO PAULO - SP 




Procuramos sempre passar o 
maior numero de informacoes aos 
nossos leitores. Contudo, certos ar- 
tigos sao publicados para leitores 
com um nivel de conhecimento mais 
alto, sendo que sempre procuramos 
atender a toda a faixa de leitores. 

A linguagem Cobol sera comen- 
tada em um dos pr6ximos numeros 
deCPU. 



PROGRAMAS 



Escrevo-lhes, primeiro, para 
prabeniza-los pelo alto nivel ins- 
trutivo que a revista vem mantendo. 

Possuo um programa que ela- 
borei em conjunto com um amigo e 
gostaria de comercializa-lo. Ha al- 
guma softhouse interessada em 
promover a criacao de programas? 

Tenho certas ideias que talvez fos- 
sem interessantes para os leitores 
de CPU. Gostaria de saber se ha 
remuneracao e, em caso afirmativo, 
quale a media. 

Gostaria de me comunicar com 
outros possuidores de MSX. 




SERGIO CARDOSO SANTOS 

RUA SENADOR VERGUE 

193/603 

FLAMENGO 

22230 - RIO DE JANEIRO - RJ 



RO, 



A melhorforma para comercializar 
seu software e entrar em contato 
com as varias softhouses que co- 
mercializam programas de autores 
nacionais e ver qual delas Ihe 
oferece melhores condigOes. 

Os artigos publicados em CPU 
sao remunerados mas n3o ha uma 




media. Envie-nos sua colaboracao 
para analise, que entraremos em 
contato, dando todas as informa- 
cOes. 



ANALISANDO 



Achei interessante a ideia de con- 
sultarem o leitor. Devo reconhecer 
que a revista CPU e uma das me- 
lhores nacionais para MSX. Porem, 
ha muito para melhorar. Uma revista 
como a MSX Magazine ou a MSX 
Club traz muito mais informacoes 
sobre novidades que a CPU. Muitos 
pensam que isso e Ibgico, pois as 
coisas sempre aparecem por la an- 
tes de aparecerem por aqui. Mas 
aqui tambem pintam novidades, 
como a MEGARAM e a transfor- 
macao para MSX 2, projetos na- 
cionais. Outra vantagem nas revis- 
tas importadas e que, geralmente, 
encontramos uma segao sobre 
eletronica, onde existem pequenas 
coisas que um usuario pode montar 
em sua casa ou service Coisas que 
vao desde um Digitalizador de 
Imagens (Magazine 12/88) ate uma 
interface MIDI para o MSX (Maga- 
zine 10/89). A revista CPU pode 
coletar e selecionar coisas do 
genero para publicar. 

Um ponto negativo foi a entrevista 
com Renato S. Oliveira, pois nao ha 
comoconcordar com certos pontos 
que levam o usuario a pensar de 
maneira errada. 

O AX nao passa de um PC Ja- 
pones incrementado. Os PCS Ja- 
poneses concorrem com o MSX ha 
muito tempo e nao sera gora a vi- 
toria de algum. Foi um erro da Folha 



PROGRAMAS PROFISSIONAIS PARA MSX E PC 



MSX: 



Supershapes 1. 2 e 3:100 Husi-acoes coda, para gra- 

phos Itl e Page Maker - 14BTN*s cade. 

Contabllldade proflsslonal comple'a em d Base 11-100 

BTN's. 

Super Conve'aor de A'qulvos Basle - d Base II. d Base 

II - Basic - 20 BTNs. 

Console de estoque p'oflsslonal em d Base II - SO 

BTNs. 

E. V. A. - Edlto' de vlnhelas anlmadas - 25 BIN'S. 

L S. D. - Lelie's Special Designers - 1 5 BIN'S. 

MSX - Dos Tools I e II - 19 BTN's cada. 



PRONTA REMESSA PAHA TODO O BRASH. 



MSX - Hello! - 20 BTN's. 

MSX Hardcopy - 16 BTN's. 

Mala Dlrela Proflsslonal - 38 BTNs. 

MSX Chan -21 BTN's. 

MSX Portfolio - 27 BTN's. 

MSX Special Texl - 24 BTN's. 

MSX Page Maker 1 .4 - 24 BTN's. 

MSX Page Maker Kit - Page Maker com Aces.- 81 BTN's. 

MSX Top Cad - 38 BTN'S 

Pedldos atraves de cheque nominal ou vale postal a 

NEWDATA INFORMATKA E SISTEMAS LTDA. 

Calxa Postal 1 049 - Rua Jose Benflca 1 67 - Campo Grande - M.S. CEP. 79.085 



Agenda Polftlca com mala dlreta e editor de textos em- 

butldos - 300 BTN's. 

Agenda proflsslonal com mala dlreta e editor de textos 

embutldos - 300 BTN's. 

Contabllldade proflsslonal completa - 300 BTN's. 

Mala Dlreta Proflsslonal - 200 BTN's. 



SOUOTE NOSSO CATAiOGO GRAUS 
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de Sao Paulo publicar a materia 
sobre o AX da maneira como pu- 
blicou. Talvez tenha sido por isso 
que dias depois foi publicado o 
aumento do Sistema MSX no mun- 
do,. Se alguem quer micro para der- 
rubar o MSX, este deve procurare al- 
go como o X68000, urn computador 
com 16 Mbytes de RAM, altissima 
resolugaao grafica, mas de 30 Mhz, 
65535 cores simultaneas, 32 canais 
de som estereo. Sua unica desvan- 
tagem eo preco. 

NSo se pode dizer que urn com- 
putador e melhor que outro sem 
analisar todas as vantagens e todas 
as desvantagens, como tambem o 
que precisamos lazer. Caso con- 
trario, poderemos comprar urn 
equipamento caro que nao faz a 
metade daquilo que necessitamos. 
Urn exemplo disso, para quern 
precisa de urn equipamento para 
trabalhar na area grafica, e o MSX 
2 + , que muitas vezes e deixado em 
segundo piano e para muitos vale 
mais que uma Amiga. 

Outro ponto da entrevista que me 
intrigou foi quando o Sr. Renato dis- 
se que os novos Expert Plus virao 
com os CIs soldados na placa e afir- 
mou que seria bom para o usuario. 
Agora, pergunto: Como faremos 
para colocar uma placa Turbo ou 
uma placa de transformacao para 
MSX2 e outros perifericos internos? 

RAFAEL ARAUJO DA SUVA 

RUADABANDEIRA.131 

BLOCOB APT 13 

CABARAL 

82500 -CURITIBA- PR 



DICASDOLEITOR 



Sou assinante da revista CPU e 
gostaria de Ihes parabenizar pelo ex- 
celente trabalho que estao fazendo. 
Conhego outras publicacdes para o 
MSX, mas nenhuma que leve tao a 
serio os temas apresentados, tanto 
jogos como linguagens e aplicacoes 
profissionais, e auxilie o usuario 
como a CPU tern feito. Fica de 
parabens tambem a equipe que 
transmite programas de linguagens 
basic, pascal, assembler, etc. visan- 
do o uso mais profissional e serio 
pelo usuario. A unica queixa feita e 
quanto ao dBase II que parece aban- 
donado. E uma feramenta de mais 
facil aprendizado depois do pascal, 
para o usuario autodidata, que creio 
sera maioria. 

Gostaria de propor uma nova ses- 
sao que estimularia os usuarios a 
pensar e competir. Esta daria urn 
tipo de trofeu ao vencedor, do tipo 
disco com programas ou urn pro- 
grama escolhido previamente, etc. 
Os problemas "jogados" aos 
usuarios seriam em nivel de pro- 
gramacao e resolucao de oequenas 




funcoes no MSX, como: programar 
as teclas de funcoes em ambiente 
dBase II; programar as mesmas 
teclas e as setas cursoras em Pas- 
cal para serem utilizadas com o Word 
Star, Supercalc; ler e mudar o 
volume do diskete direto do sistema 
operacional, por autoexec, bat, etc. 

Outra proposta seria a criacao de 
cursos do tipo "como fazer", como 
cursos de assembler (como digitar, 
gravar e ler os programas editados 
em revistas), cursos em Pascal 
(como fazer agendas, cartas, etc), 
cursos em dBase II . etc. 

Ha algumas diividas que eu gos- 
taria que voces me ajudassem. Gos- 
taria de obter a listagem de urn 
programa em Pascal publicado no 
numero 4, sobre inteligencia arti- 
ficial (a minha listagem veio ao con- 
trario e invertida, e nao consegui 
ninguem que me forneca a mesma) 
Queria, se possivel, poder adquirir 
os numeros 1, 2, 3, 5 e 6, ou xerox 
destes. Voces poderiam publicar 
dicas e mapa do Avenger (Samurai) 
e do Survivor? Qual o poke para 
fazer voltar o click do teclado? 

Ha alguem que ajude a programar 
a Megaram 128k da Orionsoft para 
ser usada como ramdisk com 
programas de arquivo alem de 
varios programas em basic? 

Envio algumas dicas sobre o cur- 
sor no dBase II e para os usuarios 
que fazem uso da Praxis 2 como im- 
pressora. 

Cursor em 
dBase II Plus -MSX 

Para se conseguir urn cursor pis- 
cante no dBase II Plus, devemos 
digitar POKE 64682,1. 

Para desligar o piscar do cursor, 
deve-se fazer: POKE 64682,0. O cur- 
sor continuara a piscar mesmo ao 
sair do dBase, e entrar no SC 2 ou 
Word Star 3.0. 

Ainda no dBase II, se digitarmos 
POKE 64683,0 teremos as letras sem- 
pre maiusculas. POKE 64683,1 
desativa. 

Acentuacao do MSX Word 3.0 
na Praxis 2 

O usuario devera listar o pro- 
grama MSXWORD3.0 e chamar a 
linha de numero 912, onde devera 
ser digitado a ordem para ativacao 
da tabela Abicomp (no caso da ABNT 
— tabela extra), como se segue: 

— 912 FOR l = 1TOF:CLS:LPRINT 
CHRJ(27)+ "Z":PRINT:PRINT:etc (o 
resto da linha nao e alterada). 

Assim, sempre que a opcao "p" 
for utilizada, a tabela da Praxis sera 
acionada e nao havera erro na acen- 
tuacao. 

Peco aos usuarios da Praxis que 
divulguem dicas do seu uso, como 
por exemplo: como fazer negrito na 
Praxis, etc. 

Curlosidades sobre 
Abadia Del Crimen 

Na tela do monitor surge, no lado 
inferior esquerdo, palayras que nos 



GANHE 




TEMPO ! 



KIT 
BIT-BASIC 



SOFTWARE 



SEU TRABALHO VAI FICAR 
MAIS FACIL 

Novos comandos para edicSo de programas 
Slntaxe sknpllflcada 
Voce.mesmo Inclul novos comandos 
Basic integralmente dlsponfvel 



LIVRO (160 P AG IN AS) 



UM SOFTWARE "ABERTO" 
AOS USUARIOS 

• Software documerrtado Inha a linha 

i ExpRca o Assembler Z-80 

1 Mostra como interceptar e adapter o Basic 



MICROBIT INFORMAtTCA LTDA. 
CAJXA POSTAL 8127 
CURrTBA-PR 



mostram o tempo disponivel e a 
relacao com os principals eventos. 
No livro, ha o relato de que o manus- 
crito de Adso (o garoto), e dividido 
em 7 dias. Creio que seja o tempo 
maximo para resolvermos a cha- 
rada. 

• matinas — hora entre 2h30min — 
3:00h da madrugada 

• Laudes — 5 e 6 horas da manna 

• Primeira — 7:30h, o raiar do sol 

• Terceira — 9:00h 

• Sexta — meio-dia, hora da re- 
FeicSo 

• Nona— 14:00a15:00h 

• Vesperas — 16:30h, ao por do sol 
hora daceia 

• Completas — 18:00 as 19:00h, 
horade serecolher. 

•noche -19:00 as 02:00h 
O frei Guilherme, quando na 
abadia, deve sempre respeitar o 
sono, com excecao do dia 05, quan- 
do devera arriscar entrar com a lam- 
parina e Adso na biblioteca. 



Acentuacao em DBase II para 
usuarios da Praxis 2 



Pode-se utilizar o programa Filtro, 
que vem junto no diskete do dBase 
II Plus, em arquivo batch. 
Para os que nao querem gastar 
espaco do disco ou nao possuem a 
nova versao do dBase, pode-se 
faze.r: 

— Usar o modify comand e ir ao 
ponto onde e escolhido a torma de 
apresentagao (impressao ou video; 
apos o "case" ou "if" impress§o 
ON, por: 



SETPRINTON 
?CHR$(27)CHR$(9) 
SET PRINT OFF 



Em urn dos pr6ximos niimeros de 
CPU iremos publicar um novo 
programa de linguagem artificial, 
mais aprimorado do que o an- 
terior. 

Os niimeros de 1 a 8 de CPU estao 
esgotados e, devido a situacao 
econdmica atual, n3o temos pre- 
visao de quando serao reimpres- 
sos. 

O mapa do jogo Avenger ja esta 
sendo elaborado e em breve sera 
publicado. 



# 



TROCA DE 
CORRESPONDENCE 



Gostaria de me corresponder com 
outros leitores desta revista, que 
queiram trocar jogos, aplicativos, 
utilitarios, dicas e manuals para os 
mesmos. Possuo um MSX 1.1, drive 
e 5 1/4", gravador, Megaram mo- 
nitor, impressora e uma grande 
quantidade de programas. 

RICARDO BORGES GOMIDE 
CSA03LOTE16APT°602 
72015 - TAGUATINGA - DF 

• • • 

Quern quiser trocar dicas, pro- 
gramas e bater um papo por carta, 
escreva-me. 

FABIOVILLAVICENCIO 

CAIXA POSTAL 717 

95700 - BENTO GONCALVES - RS 

• • • 

Estou escrevendo para parabe- 
niza-lo pela excelente materia 
publicada em CPU niimero 10 en- 
titulada APPLE VERSUS MSX, pois 
foi interessante e totalmente ver- 
dadeira. Gostaria, tambem, de 



trocar informacoes e tudo mais com 
os outros leitores da revista e 
usuarios de MSX. 

CARLOS HENRIQUE SUFFERT 
R. RICARDO GAVENKI, 55 
91000 - PORTO ALEGRE - RS 

• • • 

Venho, atraves desta, parabeniza- 
los pela revista CPU, que acom- 
panho desde o numero dez, sendo 
que gostaria de comprar os nii- 
meros de 1 a 9. Tambem gostaria de 
trocar dicas e macetes de jogos 
como Freddy Hardest II, Rambo I, 
Mask III, Alcatraz, The Castle Ex- 
celent, Pay Load, etc. Interessados, 
telefonem para (061)441-2698 nos 
fins de semana. 

TACITO AUGUSTO R. DE FRE'TAS 
R. CEL. JOSE DA COSTA, 27 
76860 - ORIZONA - GO 

• • • 

Desejo trocar programas, jogos, 
etc., com outros leitores. Possuo 
um MSX e disco. 

LUCIOSOARESDASILVA 

Ql 14 - CONJUNTO D. CASA 15 - 

GUARAI 

71015- BRASILIA -DF 

• • ■ 

Possuo um micro Expert 1-1 drive 
DDX 5 1/4", impressora e monitor e 
gostaria de entrar em contato com 
usuarios da linha MSX, para a troca 
de programas, dicas, livros, revistas 
e pokes. Tenho uma colecao de 
mais de 750 jogos e 50 aplicativos. 

HDI-SOFTCLUBMSX 
AV. TAMANDARE654- 
ED. CANNES APT 101 - 
TAMBAU - 58033 - 
JOAOPESSOA- PB. 



e falando em numero anterior... 

TESTE TDE STUDENT 
PELO COMPUTADOR 

APLICACOES DE USO GERAL 

Corrigindo alguns erros constanles do ortigo ocima, publicado na revista CPU II (n° 14): 24— 32, 1990. 



Pagma 


Coluna 


Linha 


Erro publicado 


Corre^ao a fazer 


24 


02 


15 


"menor que ..." 


"maior que..." 


25 


01 


18 


"nao significante" (N. S.) 


"Nao Significante" (N. S.) 


25 


01 


28 


(p0.05) 


(p < 0.05) 


25 


01 


48 


a-sepO.05 


o-se p < 0.05 


25 


01 


50 


b-se p 0.05 


a-se p > 0.05 


26 


02 


Tltulo 


O TESTE "t" EMPAREL 
PAREADO (paired "t" test) 
HADOOU 


O TESTE "t" EMPARELHADO 
OU PAREADO (paired "t" test) 
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MSXDEBUG E SCREEN IV 

Os programas que faltavam na sua biblioteca 



MSXDEBUG 

1)DISP endereco 

Mostra o conteudo da memoria dado por endereco. Para avancar 
ou retroceder, utilize as teclas dos cursores. Estando na posigao 
desejada, prcssione < CR > . Keste momento, voce podera al- 
terar o conteiido desta memoria ou se deslocar ao longo dos co- 
digos livremenre. Para alterar utilizando diretamenre o teclado, 
prcssione < CR > novamente. Repita sempre que precisar mu- 
dar o modo de edigao. Para sair, hasta pressionar < ESC > . 

2) EXEC endereco 

Executa este endereco sem break-points. 

3) MOVE infcio, fim, destino 

Move um bloco na memoria. Infcio deve ser menor que fim. 

4) FILL infcio, fim, dado 



Preenche uma area de memoria espeeificado por infcio e fim. 

5)DIR 

Mostra o diretono do disco de forma simples. 

6) DSAVE nome. cxt, infcio, fim 

Salva o bloco limitado por infcio e fim no disco com o nome 
nome.ext. Salva qualquer coisa em qualqucr lugar. 

7) DLOAD nome. ext. endereco 

Carrega qualquer arquivo, desde que esteja no disco e o coloca 
no endereco dado por endereco. Nestes tres comandos nao e pos- 
sfvel especificar o drive. Sera utilizado aquele que estava habilita- 
do antes de executar o MSXDEBUG. 

8) DOS 

Encerra as atividades no MSXDEBUG e retorna ao DOS. 



SCREEN IV 




SCREEN 4 


Habilita tela de 64 x 24 linhas 


FILL 


Um paint 8 vezes mais rapido 


OVER 


Sobrepoe textos 


CLS ON/OFF 


Inibe e habilita o CLS quando se muda o numero de 




colunas com o comando WIDTH 


WIDTH 


Alterado para comportar 64 colunas 


SCREEN SAVE/LOAD 


Grava e carrega telas do cassetc 


SCREEN OUT 


Imprime telas na impressora 


LIST 


Apresenta a listagem de um programa, sendo que a mesma 




e interrompida quando a tela fica cheia, pedindo que se 




pressione uma tecla pra prosseguir. 



Solicite logo seu disco com os dois 
programas. O preco e de 21 BTNF's do dip 
de postagem do pedido. 

Seu software tern garantia de 30 dias 
contra qualquer defeito de gravacao. 

Acompanha o programa extenso manual. 



REVENDEDORES: 



Envie seus dados para a revista CPU, 
juntamento com cheque nominal a Aguia 
Informatica Ltda. ou vale postal pagavel na 
agenda Copacabana. 

A entrega e imediata e as despesas de 
remessa, atraves de correspondencia 
registrada, ja estao incluidas. 



MSX TRONIC 
INFORMATICA LTDA. 
Ilu.] Senadnr Vergui n ?/ J 205 - 
Flumcngti 122 SO ■ Rio Jc lanciro Kl 

Tel.: ; ' M 



GAME OFF TIME SOFTWARE 
E HARDWARD 

\v. Jabaquata ISQ8 sala 08 - Saiide - 04046 - 

I aulo - SI' 
lei.: (Oil) 581.2739 



MANIACOS DO MSX 

Av. Jabaquara 99 sala 54/5" nndar - 
Vila Mariana - 04050 - Sao Paulo - SP 
Tel.: (011) 276.7665 




constante entre o DOS e o pr6prio 
MSXDEBUG. A area de memdria a 
partir de 0D000H, mais precisamen- 
te por volta de 0D600H, esta ocu- 
pada justamente com as rotinas de 
suporte do DOS ao MSXDEBUG. Por 
isso, preenchendo aquela area com 
valores aleat6rios, o sistema perde 
o controle ja que as entradas das 
rotinas do DOS foram destruidas. 

Caso voce precise de mais es- 
paco para trabalhar, use apenas 1 
drive e mantenha pressionada a 
tecla CONTROL ao ligar o compu- 
tador. Com isso havera urn ganho de 
cercadelK. 



DRAW E PUT 
SPRITE 



Sou urn leitor assiduo da revista 
CPU. Nos e a linha MSX estavamos 
precisando de uma revisla de nivel 
profissional, com uma linguagem 
moderada. 

Gostaria de dar algumas suges- 
toes. No final de cinco ou dez revis- 
tas publicadas, editar uma edigao 
extra com as respostas das pergun- 
tas mais interessantes e as mais 
frequentes. Deveria (alar, tambem, 
sobre perifericos, jogos mais com- 
prados e sobre a participacao da 
linha MSX no mundo. 

Gostaria de saber como posso 
fazer para que uma ligura geome- 
trica qualquer apareca por inteiro e 
instantaneamente, como acontece 
nos jogos e sem usar o PUT 
SPRITE, pois o niimero da chamada 
so e permitido de a 31. Usando o 
DRAW, por exemplo, os pontinhos 
aparecem progressivamente. 

Na revista niimero 1 apareceu 
uma informapao errada na pagina 
28, dizendo a senha dos Goonies in- 
corretamenle. 

FABIODIAS GOLDSTEIN 

RUA PRES. CARLOS DE CAMPOS, 

183/104 

LARANJEIRAS 

2231 - RIO DE JANEIRO - RJ 

Os unicos recursos que o BASIC 
oferece para colocar uma tigura na 
tela s3o, justamente, o DRAW e o 
PUT SPRITE. Infelizmente, devido a 
lentidao desta linguagem, nao e pos- 
sivel criar uma impressao instan- 
tanea na tela. As figuras que 
"aparecem" instantaneamente 
como acontece nos jogos, toram 
feitas por rotinas em linguagem de 
maquina. Em ambos os casos, a im- 
pressao e teita por partes, mas a 
diferenca esta na velocidade, que e 
bem maior nas rotinas feitas em lin- 
guagem de maquina. 

A criacao de rotinas para impres- 
sSo de figuras utilizaveis pelo Basic 
ja esta sendo estudada pela equipe 
da revista. E s6aguardar. 

Existem varias vers6es do jogo 



Goonies e cada uma delas possui 
senhasdiferentes. 



ENUMERANDO 




Quero, primeiramente, parabe- 
niza-los pela excelente revista que e 
aCPU. 

Tenho algumas diividas, suges- 
toes e dicas em relacao ao MSX e a 
revista. Primeiro, as diividas: 

1 — Eu entendo que urn aplicativo 
ou urn utilitario nao rodem em fitas 
cassete, mas qual a razao de jogos 
como Nemessis I (sem Megaram, 
Elite, Operation Wolf e outros nao 
rodem em fitas, ja que o jogo e car- 
regado apenas uma vez para ser 
executado? 

2 — Os cartuchos para o sistema 
MSX tern uma memoria limite? Qual 
a capacidade? 

3 — Urn jogo como Nemesis e 
outros ditos especiais (Abadia Del 
Crimem, etc., podem ser gravados 
em cartuchos? 

4 — Eu poderia ter urn jogo es- 
pecial (com Megaram gravados em 
cartucho e usando junto com o car- 
tucho Megaram e no slot 'b' o jogo 
gravado no cartucho? 

5 — Urn disco de 5 1/4 tern uma 
capacidade de 360K ou 720K, qual 
seria a capacidade de uma fita cas- 
sete em urn lado e nos dois lados? 

MARCELO DE ANDRADE PASSOS 

R. ARISTIDES N. CARVALHO, 367 

CENTRO. 

29200 - GUARAPARI - ES 



Para evitar confusao, as respos- 
tas estao enumeradas, como se 
seguem: 

1 — Qualquer jogo pode ser 
gravado em fita. Entretanto, alguns 
jogos se tornam inviaveis pelo 
tamanho, ou entao, nao ha interes- 
se por parte do fabricante, ja que 
urn programa em fita e mais vul- 
neravelac6pia ilegal. 

2 — MSX pode enderecar, 
teoricamente, 1 Mbyte, divididos 
atraves de seus 4 slots. Desta for- 
ma, cada cartucho acessa, no 
maximo, 256 Kytes. 

3 — Sim, nao s6 estes, mas qual- 
quer programa pode ser gravado em 
cartucho. 

4 — A mistura de cartuchos no 
slot e possivel, mas nem sempre ha 
garantia que funcionarao. 

5 — A capacidade de urn disquete 
de 5 1/4 pode variar de 18K ate 1,4 
Mbytes, dependendo do drive. O 
padrao usado no MSX nos da 360 Kb- 
ytes no total, se usado urn disco de 
dupla face. Como no disco, a ca- 
pacidade de urn fita varia, dependen- 
do entre outros fatores, do tempo 
de duracao e, principalmente, da 
taxa de transmissao dos dados. 



6 — Por fim, urn cartucho pode ser 
gravado e regravado quantas vezes 
forem necessarias, bastando dispor 
do equipamento necessario para 
tal. 



MAIS DICAS 




Em primeiro lugar, parabens pelo 
sucesso da revista. 

Mando uma relacao de dicas para 
jogos, pois ja vi que muitos leitores 
se interessam. 

Bosconian 

10 BLOAD"BOSC01":POKE &H92B- 

B.250 

20 DEFUSR = PEEK(&HFCC0) 

•256+ PEEK (SHFCBF):A = USR(0) 

30BLOAD"BOSCO2".R 

Knight Mare 

10 BOLAD "KMARE1":PO- 

KE&H91CA.0 

20 DEFUSR = PEEK (&HFC- 

C0)'256+PEEK(&HFCBF) 

30A = USR(0): BLOAD ",R 

Zanac 

10 BLOAD"ZANAC1":POKE&H9654,0 
20 DEFUSR = SHD000:A = USR 
(0):BLOAD"ZANAC2",R 

Camelot Warriors 

10 BLOAD"CAMEL1".,R:BLOA- 

D"CAMEL2" 

20 POKE &HC55C,250:POKE 

&HC7B7.250 

30 DEFUSR = PEEK (&HFCC0) 

'256 + PEEK (&HFCBF):A = USR(0) 

Goonies 

10 BLOAD"GONIE1 ":POKE 

&H9261.201 

20 DEFUSR= PEEK (&HFCC0) 

*256+ PEEK (&HFCBF) 

30 A = USR (0) : BLOAD "GONIE2", 

R 

The Castle 



10 BLOAD "CASTLEV'POKE 

&H9D53.250 

20 DEFUSR = &HD000:A = USR (0): 

BLOAD"CASTLE2",R 

Stone of Wisdom 

10 BLOAD "STONE1", R:BLOAD"S- 

TONE2":POKE&H9327,60 

20 DEFUSR=PEEK (&HFCC0) 

•256+ PEEK (&HFCBF) :A = USR(0) 

Haunted House 

10 OPEN "HAUNTED .004' ' 

AS#1:LEN = 1 

20 FIELDS, 1 AS AS 
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MSXDEBUGE 
SCREEN IV 



Alguns leitores tern, ainda, al- 
gumas duvidas quanto aos projetos 
SCREEN IV e MSXDEBUG. Mais 
uma vez, lembramos que os pro- 
gramas so funcionarao se todos os 
passos forem seguidos a risca. Nao 
basta digitar os blocos, verificar a 
soma e pronto. Tambem e neces- 
sario seguir o que o texto deter- 
mina, colocando os dados corretos 
nos lugares cerlos. Alias, e nesta 
parte que as coisas principals sao 
descritas, principalmente pelo nivel 
de detalne e importancia envolvi- 
dos. Os blocos content apenas 
rotinas isoladas, devendo ser li- 
gadas atraves dos dados acrescen- 
tados em cada parte. 

Todos que digitaram o programa 
BASIC que cria o MSXDEBUG e ain- 
da recebem a mensagem ERRO NO 
PROGRAMA devem verificar se a 
parte montadora esta certa. Se es- 
tiver, verifique os dados, procuran- 
do distinguir caracteres semelhan- 
tes como o 8 o B. Nao esquecam 
que muitos leitores passaram por 
esta etapa sem problemas. 

Ao leitor Jose Humberto Freg- 
nani, aconselhamos n§o utilizar ar- 
tificios daquele tipo como relatado 
em sua carta. erro a que se refere, 
toi sanado num artigo especialmen- 
te elaborado para este fim, na CPU 
numero 10. O tato da troca aleatoria 
daquele valor ter funcionado, nao 
garante que o funcionamento geral 
do programa nao foi afetado. Urn 
programa em linguagem de maquina 
nao deve ser alterado a menos que 
o programador esteja totalmente 
seguro daquilo que estiver fazendo. 
Caso tenha alguma diivida, nao 
hesite em nos escrever para pedir 
urn esclarecimento, ou mesmo 
sugerir uma mudanga. Espero que 
isto seja suliciente para convencer 
a voce e aos demais leitores a aban- 
donar ideias como essa. 

Acreditamos que suas duvidas 
quanto ao comando DSAVE ja te- 
nham sido esclarecidas. No niimero 
12 da revista, o artigo do MSXDE- 
BUG foi destinado exclusivamente a 
discussao dos problemas deste tipo 
e como resolve-los. O fato do 
programa HERO ter sido aceito, e 
devido o modo de gravacao, como 
explicado naquele artigo. 

No numero 11, esta publicado o 
bloco inicial do conjunto de cha- 
madas para as rotinas do SCREEN 
IV. Os leitores que estiverem tendo 
problemas com o funcionamento do 
programa, como nao conseguir 
ativar a tela 4 ou nao obter o coman- 
do PRINT ou WIDTH nesta tela 
devem rever esta parte. Os valores 
enviados contendo a soma dos 
diversos blocos nao puderam ser 
usados a contento, uma vez que a 



parte inicial do seu programa cer- 
tamente esta diferente. 

Aos leitores que ja comecaram a 
usar o SCREEN IV, como o leitor 
Waldir Alves Bezerra, e tern pro- 
blemas com alguns comandos, no 
caso o INPUT, aconselhamos aguar- 
dar a conclusao do programa. Na 
quinta parte do projeto, todo am- 
biente BASIC estara pronto. Antes 
de implementada esta parte, nao e 
possivel manipular arquivos sequen- 
ciais ou randomicos. A prop6sito, 
gostaria de saber que caracteres 
apareciam ilegiveis no video, pois is- 
so realmente nao pode ser consi- 
derado normal. 

As sugestoes foram anotadas e a 
vinda de urn desassemblador, como 
pode perceber, ja esta disponivel. 

Sem mais para o momento. 

SERGIO DURICCALHEIROS 



^h 



SOLUCAOE 
DUVIDA 






Estou seguindo, a partir da revista 
CPU numero 8, o projeto Screen IV. 

Digitei os 2 blocos publicados 
com o MSXDEBUG. Executei o 
programa, entrei o comando 
"SCREEN 4", a tela de alta reso- 
lucao foi ativada e, apos alguns 
segundos, o modo texto foi reati- 
vado, conforme foi dito. 

Na revista numero 9 foi publicado 
o modulo de impressao. 

Tambem foi dito para colocar os 
bytes FDA4H em 4168H. Eis o erro. 
Varios leitores escreveram a revista 
dizendo que nao conseguiram im- 
primir caracteres na nova tela, por- 
que os bytes FDA4H nao devem es- 
tar em 4168H e sim em 4169H. E o en- 
derego do gancho do comando 
"WIDTH" deve ficar em 4167H. Apos 
esta correcao, o programa fun- 
cionou corretamente. Todas as lis- 
tagens dadas nas revistas numeros 
9 e 10 funcionaram perfeitamente. 

Agora, tenho uma pergunta a 
fazer, com relagao ao MSXDEBUG: 
por que se preenchermos a area de 
memoria a partir de D000H havera 
uma queda do sistema? 

JORGE DANIEL AGUILAR SOLT 

RUA CABO VERDE, 290/174 

VILAOLIMPIA 

04550 - SAO PAULO - SP 

Realmente, alguns enderecos do 
SCREEN IV foram publicados com 
erro, mas acreditamos que, a esta al- 
tura do campeonato, todos os 
usuarios do SCREEN IV que pas- 
saram por este problema ja devem 
te-lo solucionado atraves das lis- 
tagens que foram publicadas nos 
numeros anteriores. 

A queda do sistema ocorre por- 
que, quando o MSXDEBUG esta na 
mem6ria, ha urn interfaceamento 



Tudo para 
o seu MSX 1 

eMSX2.0 



Gravacdes em 
disquetes 5 1/4 e 3 1/2 
JOGOS 

• Para Expert, Hotbit, Plus e DD Plus 

• Para MSX 2.0 

• Para Megaram (M) 

• Com 720 Kb (2DD) 

LANCAMENTOS: King's Valley 2(M), Space 
Mambo(M), Deep Fbrest(M), War of Dead(M), 
Aleste 2(2DD), YS lll(2DD). Thexder 2(2DD), 
Fantasm 2(2DD). etc. 

APLICATIVOS E UTILITARIOS 

Mala Direta. Editores de Texto, Agendas, 
Contabilidade, Sistemas Graficos, Planilhas, 
Banco de Dados, Copiadores, etc. 

LINGUAGENS E COMPILADORES: Turbo 
Pascal. Cobol, Aztec C (com manual), As- 
sembler. MBasic, etc 

NOVIDADE: Cartucho HOT-LOGO 

APLICATIVOS E DIVERSOS PARA 
MSX 2.0 



PAGE PRO (Desk Top) 

Um super editor de paginas ilustradas 
utilizando toda a capacidade do MSX 
2.O. Saida para impressora e manual 



E MAIS: Zaxaza (Editor de games). MSX 2 
Music Edit, Video Graphics. Amiga Digi- 
Screen, C Compiler e Telas digitalizadas 



Pelo menor prego. 

a melhor qualidade e 

garantia de 1 ano. 

• Micros Expert Plus e DD Plus • Impres- 
sora Lady 80 • Interface • Cartao 80 colu- 
nas • Modem • Monitores • Expansor de 
slots • Joystick • Datacorder 

5 1/4. 3 1/2.5 1/4(720 Kb) 
Com 20 jogos gratis 

256 Kb de memoria. 
Com 6 Mega-Games gratis 

Com 10 jogos para 2.0 
gratis 

Disquetes 5 1/4 e 3 1/2 
Porta-Disquetes 
Capas • Cabos 
Formularios 80 col. 




Avallon Informatica Ltda. 
Av. Almirante Barroso, 22 sala 602 
Centra - Rio de Janeiro CEP20O3i 
Ao lado do Metro Cahoca 
Das 9:00 as 19:00 Hs. 

Tel. (021)262-1636 



Distributor autorizado MSX Soft 




30LSET AS = CHR$(250) 
40 PUT 1,2349: CLOSE 

50 REM VOLTE AO DOS E CHAME O 
PROGRAMA 

DANIEL CICERO GONDRAN 

R AUGUSTOFDEMORAES617 

SOCORRO 

04763 -SAO PAULO - SP 



MEGARAM 



Escrevo para a CPU, pela primeira 
vez, e fiz esta carta para responder a 
critica a respeito da Megaram, do 
Sr. Celio, publicada na CPU numero 
11. 

Depois de ler a carta do Sr. Celio, 
procurei saber um pouco mais 
sobre o cartucho Megaram que pos- 
suia. 

Concordo que para a Megaram 
sao praticamente inexistente essas 
aplicacoes profissionais, exceto 
que podemos usa-las como um Disk 
drive, ou seja, como Ram Disk. 

Creio que voce ja deve ter ouvido 
falar a respeito do Megaram Disk 
plus, da DDX, que permite sua 
utilizacao como um Disk drive, sen- 
do muito Mil, pois acelera o proces- 
samento de dados de programas 
que constantemente aciona este 
periferico, como o Page Maker, 
dBase II, Wordstar, etc. 

Porem, o custo elevado do pro- 
duto nos faz querer bem mais do 
que acelerar o processamento de 
programas. 

Pesquisando em revistas, achei 
apenas 2 aplicativos que utilizam a 
expansao Megaram e ambos so fun- 
cionam no MSX 2, so sendo encon- 
trados no Japao. Sao eles: MSX 
Write, da ASCII Corporation e o Hal 
Note da Hal Laboratories. 

O pior e que se estes programas 
chegassem ao Brasil, necessitariam 
de uma expansao de 5 Megarans 
para rodar, 

Porem, para os fanaticos por 
jogos, que nao sao poucos, a expan- 
sao Megaram e muito toil, pois 
utilizada em conjunto com um MSX 
2, torna o micro um verdadeiro fli- 
perama. 

Qualquer duvida sobre a existen- 
cia dos programas japoneses que 
menciono acima, e so consultar a 
MSX Magazine de dezembro de 
1986. 

Para os fanaticos, a: vai uma dica: 

No jogo Gradius II (Nemesis II), 
tecle F1 e escreva as seguintes 
sennas: 

NEMESIS (passadefase) 

LARS 18TH (todas as armas) 

METALION (imunidade) 
RODNEY MULLER 
RUA HERMES DUTRA, 456 
12220 - SAO JOSE DOS CAMPOS - 
SP 




ERRODE DISCO 



Na edicao numero 11, li a corres- 
pondent do Sr. Celio A. F. da Silva 
e constatei que sua situapao se as- 
semelha a minha e queria compara- 
las. 

Um amigo me emprestou um drive 
para gravar uns programas para ele, 
de fita para disco. Gravei uns cinco 
e comecei a ter problemas. pri- 
meiro deles foi com o Batman, que 
nao consegui transferir para disco 
ate hoje. 

Depois tive problemas com o Vam- 
pire mas, depois de ter feito algu- 
mas mudancas, consegui. 

Ainda tinha cerca de 27 Kb livres 
no disco e tentei copiar mais um. o 
Dizzy Ball, Tudo corria bem ate o ul- 
timo bloco, quando, apos o termino 
da gravacao, obtive a mensagem de 
erro no disco. Tentei de tudo para 
ver novamente os programas, sem 
obter sucesso. Perdi todos os 
programas do disco. 

Gostaria de ajuda, pois esta nos 
meus pianos comprar uma unidade 
de disco e nao queria ter os mes- 
mos problemas. Sera que o pro- 
blema e com a interface? Se for, 
qual a aconselhavei? 

Aproveito a oportunidade para 
agradecer a Andre L. Anciaes, Mar- 
cos R. Tavares e Eduardo R. Ta- 
vares, por terem encontrado os 
pokes de vida infinita para o El Mundo 
Perdido. Tentei varias vezes, mas 
nao consegui e mando a dica do 
jogo Venom. 

10 COLOR 10,1,1:SCREEN2:OPE- 

N"GRP:"AS#1:PRINT#1,"OLISOF- 

T— VENOM-CPU" 

20 BLOAD"VENOM1",R:BLOA- 

D"VENOM2",R:BLOAD"VENOM3" 

30 POKE &H B555,0:POK E 

&HB556,0:POKE SHB557.0:POKE 

&HB7ED,0:POKE &HB7EA,0:POKE 

&HB7EB,0:DEFUSR = &H8700 

:A = USR<0> 

40 BLOAD ■'VENOM4".R:BLOA- 

D"VENOM5",R 

50 REM 

60 REM 

Estes pokes acima fazem com 
que, quando passarmos de uma tela 
para outra, se voltarmos, apare- 
ceremos no outro lado da tela, a 
direita. 

ARLINDOM.DEOLIVEIRA 

ESTRADA DOS BANDEIRANTES. 

7993 

BLOCO 07 APT 406 

JACAREPAGUA 

22780 - RIO DE JANEIRO - RJ 

Acreditamos que o problema que 
aconteceu consigo tenha sido por 
causa da interface de drive. 

A melhor forma de comprar um 
equipamento e obter as maiores in- 
formacoes possiveis sobre o fa- 
bricante, rede de assistencia tec- 



nica, prazo de garantia e, principal- 
mente, consultar outros usuarios 
que, melhor que ningu6m, poderao 
informar se estao satisfeitos com o 
produto que possuem. Quanto mais 
criteriosa for a pesquisa que rea- 
lizar, maiores serSo as chances de 
adquirir um produto que o satisfaca 
e que atenda as suas necessidades 
como usuario. 



INTERFACE 




Possuo um computador MSX 1.1, 
um drive e uma impressora. Inicial- 
mente, gostaria de parabeniza-los 
pela excelente revista, que a cada 
mes se torna mais interessante. 
Comecei com a numero 9 e preten- 
do prosseguir com a colecao. A 
unica coisa que acho ruim e o 
preco, mas temos que nos confor- 
mar. Gostaria que voces me tiras- 
sem algumas duvidas, as quais 
relacionoabaixo, 

Possuo um drive DDX e a sua in- 
terface nao acessa os arquivos do 
disco atraves de portas ( (0DUH- 
0D3H) e sim por memoria (07FC8H- 
07FCCH e 0BFC8H-0BFCCH do slot 
da interface), fazendo com que al- 
guns arquivos (Robocop, Graphic 
View, Silent Shadow, Elite, etc) nao 
entrem. Como devo proceder, para 
que os mesmos funcionem. 

Pediria que voces me ensinassem 
como fazer uma miisica era Assem- 
bler, mas nao naquele estilo de "en- 
cher" o registrador HL com noti- 
nhas do tipo •'CDEFGAB" e depois 
da um CALL &H73E5, mas sim do 
jeito que e feito nos jogos e em for- 
ma de mneumonicos, explicados 
passoa passo. 

ALEXANDRETAVARES V DIAS 
RUA RIO DE JANEIRO, 139 
CAMPOGRANDE 
11075 -SANTOS- SP 

A interface por enderecamento de 
memdria e a que segue o padrao 
MSX e a que faz o acesso por portas 
esta fora do padrao. Infelizmente, a 
primeira interface que foi lancada 
no Brasil foi a que fazia o acesso por 
portas e esse sistema foi utilizado 
por varias empresas. Com isso, 
varios programas foram adaptados 
para este tipo de interface, pois na 
epoca era a mais utilizada. 

Hoje em dia ja temos varios fa- 
bricantes com interfaces para drive 
dentro do padrao, como e o caso da 
DDX, Gradiente, Sharp e outras e 
acreditamos que em breve ja exis- 
tiram versoes desses softwares que 
rodem nestas interfaces. 

Anotamos suas sugestoes e, nos 
proximos numeros de CPU, abor- 
daremos os assuntos que nos 
propoe. 
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lguatemi-Loja-106 
Tel.: (085) 239-2798 
Fortaleza - CE 



SHOPPING DA INFORMATICA. 




|XP 

PLUS E DD PLUS 

©gradiente 

MONITOR DE VIDEO 12" 

PHANTOM SYSTEM 

COM PRE ESTA BRIGA ! 




• VfDEO - GAME 
de ultima geragao 

• VARIOSCARTUCHOS 
DISPONlVEIS 

• LAZER GUN 
GRADIENTE 




is 




MASTER SYSTEM 




• CARTUCH0SDE1,2e4MEGAS 

• PENSE BEM 

Muito mais que um brinquedo, quase um computador. 



DUNGCOM 

ICA LTDA 




PISTOLA LAZER 



CARTUCHOS 




TODA LINHA DE CALCULADORAS 

Thai HEW LETT 
WHOM PACKARD 

• JOGOS 

• PROGRAMAS APLICATIVOS 



INTERFACES 
ACESS6RI0S 



IMPRESSORAS GRAFIX 
GLX100-132 colunas 

• FORMULARIOS 

• ETIQUETAS 

• DISQUETES 5 1/4" E 3 1/2' 

DRIVE MSX DDX 

5 1/4" E 3 1/2" -720 KB 



• FITAS VI IMPRESSORA 

• CABOS P/IMPRESSORA 

• MESAS P/MICROS 

• KIT DELIMPEZA DRIVE 

• ARQUIVOSP/DISQUETES 

• TRANSFORMADORES 220V/1 1 0V 
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• FILTROS DE LINHA 

• ESTABILIZADORES 
p/Micros e Fax 

• CAPAS 



• JOYSTICKS 

• LIVROS 

• REVISTAS 

• FITAS VHS 



BIBLIOTECAS 
EM PASCAL 



Parte I 

FREDERICO DOS SANTOS LIPORACE 




PROGRAMA 

UtilitariO 



E cada vez maior o interesse de programadores sobre a lin- 
guagom Pascal, sendo, inclusive, por muitos considerada a "lin- 
guagem da moda". Mais do que a propria linguagem, a razao 
do sucesso do Pascal entre os usudrios do MSX e a existencia 
do excelente pacote Turbo-Pascal da Borland, que junta num 
mesmo progroma um poderoso editor e um bom compilador, o 
que possibilita ao usudrio uma lacilidade de edicao manuten 
cao de programas que nao existe em nenhum outro compilador 
vindo do CP/M. 

Infelizmente, grande parte das pessoas que iniciam o apren- 
dizado da linguagem, desisfem ainda cedo, devido d falta 
generalizada de informacoes sobre a versao especifica para 
CP/M, alem do fato de nao existirem funcoes internas de aces- 
sos grdficos, som e outras potencialidades do MSX. 

J6 foram publicadas, aqui na propria CPU e em outras revis- 
tas especializadas, bons artigos de autores diversos que 
tratavam desse problema. No entanto, os pacotes publicados 
eram "fechados", ou seja, ficava muito d iff c i I implementar a 
parlir das funcoes apresentadas outras que fossem conside- 
radas uteis pelo programador. 

E neste ponto que a serie iniciada nesse numero se diferen 
cia das demais. Todas as novas funcoes apresentadas serao 
comentadas com a maior diddtica possivel, possibilitando, as- 
sim, implementagao de novas funcoes ao gosto do usudrio. 
Alem disso, serao apresentadas nao somente as rotinas bd 
sicas de manipulacao de video e do PSG, mas tambem pro 
cedures de Windows, Impressao de tela grdfica, manipulacao 
do set de caracteres e interrupcoes, etc., que no final formarao 
verdadeiros bibliotecas que poderao ser utilizadas para tornar 
a programor,ao em Pascal muito mais agroddvel e acessivel. 

E bom ressaltar aqui que a serie nao tern como objetivo en- 
sinar a programar em Pascal, assim como o entendimento das 
rotinas apresentadas exige um pequeno conhecimento de As 
sembler e da arquitetura do padrao MSX. Isso, no entanto, nao 
deve tirar o interesse de quern nao possua esses conhecimen- 
tos, uma vez que as rotinas poderao ser usadas sem problemas 
por qualquer pessoa que programe em Pascal. 

Juntamente com as bibliotecas, serao publicados artigos 
sobre comandos especificos de versao para CP/M, que, jus- 
tamente por serem exclusivos, nao sao apresentados com 
detalhes pela literatura especializada, que e voltada exclu- 
sivamente para a linha PC. 

O cora^do das rotinas apresentadas nesse primeiro bloco e 
tambem das que serao apresentadas no futuro e o procedimen- 
to CLPRIM. E atraves dele que e feito toda a comunica^ao entre 
o programa Pascal, a BIOS e o proprio interpretador BASIC. O 
funcionomento detalhodo dessa rotina serd explicado no artigo 



que tratar da instrucao INLINE. Por enquanto, basta saber que 
essa instrucao permite que sejam inseridas, dentro do pro- 
grama em Pascal, rotinas em Linguagem de Mdquina. 

O mais importante e que fique claro como e feita a passa- 
gem de dados entre a BIOS e o programa Pascal. Ela e feita 
atraves da leitura e/ou escrita em varidveis definidas com o 
mesmo nome dos registradores do Z-80. Uma vez em posse dos 
dados necessdrios, CLPRIM transfere o controle para a BIOS e 
depois o devolve para o Pascal. Como um exemplo vale mais 
que 100 palavras, vamos direto a ele. 

Vamos supor que houvesse a necessidade de se ler o con- 
teudo de um endereco da VRAM em determinado programa. O 
livro vermelho nos diz que existe uma luncdo na BIOS que faz 
exatamente isso, e indica qual o seu endere<;o e os parametros 
a serem passados. S5o dados, portanto: 

Nome: RDVRM 
Endereco: 004AH 
Entrada:HL= Endereco a ser lido 
Salda: A = Byte lido 

A fun^ao em Pascal ficaria, entao, escrita da seguinte 
maneira: 

Function Vpeek (x:integer):byte; 
begin 

hi: = x; {Transfere o valor de X } 
{ para o "par de registradores" ) 
{HL} 

Clprim ($004A); 

{ O argumento de Clprim 6 o enderei;o da rotina } 
Vpeek: = a{ Valor de retorno estd no "registro" A 
end: 
Outro exemplo: Rotina para transferencia de bloco da Vram 
para a Ram: 
Nome:LDIRMV 
Endereco: 0059H 
Entradas: BC = Tamanho 

DE = Endereco da Ram 
HL = Endereco da Vram 
Procedura Vram — Mem (x,y,z: integer); 
begin 

de: = x ; { Transfere dados } 
hl: = y; 
bc: = z: 

Clprim ($0059) ; 
end; 

Uma vez entendido o processo utilizado, nao existirao 
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maiores dificuldades para implementacao de novos comandos . 

A descncao dos comandos apresentados neste 1° bloco e a 
seguinte: 

• Beep: Gera um BEEP. 

• FillVram (x, y, z: integer); 

Preenche 6rea da Vram com inlcio em y e de tamanho z com by 
tex. 

• Stick (x); 

Le status do joystick x. 

•Trig(x); 

Le status do gatilho x. 

• GraphMode (x); 
Seleciona Screen (x). 

• Color (x, y, z); 

Define x como cor de frente. y como cor de (undo e z como cor 
de borda. 

• Vpeek (x); 

Le conteiido do endereco x da Vram. 

• Vpoke (x, y); 

Escreve no endereco x da Vram o byte y. 

• Pause: Espera uma tecla ser pressionada. 

• LimpSpr: Limpa 6rea de sprites. 

• Vr Mem (x. y. z); 

Copia bloco de tamanho z da Vram, a partir do endereco y para 
o endereco x da Ram. 

• Mem Vr (x, y, z); 

Copia bloco de tamanho 7 a partir do endereco y do Ram para o 
endereco x da Vram. 



• PutSprite (x, y, z, w); 

Coloca sprite n° x na posicao (y,z) com a cor w. 

• CreateSprl (x,y); 

Define sprite y (8x8, tipo 1 ) e o associa ao niimero x. Note que 
ye do lipo Sprite), ou seja, um array de 8 bytes. 

• CreoteSpr2 (x, y); 

Idem ao anterior, s6 que e usada para definir sprites de 16x16 y 
e do tipo Sprite2. 

• Size(x); 

Define o tamanho do sprite que serd utilizado. Se x=0 os 
sprites serao apresentados com 8x8 pixels (tipo 1) e se x = l 
serao apresentados com 16x16 pixels (tipo 2). 

• Magnitude (x); 

Especifica se o sprite sera exibido em tamanho ampliado (x = 1 ) 
ou normal (x = 0). 

O tipo dos parametros e dos resultados das funcoes pode ser 
identificado atraves da propria listagem. 



Salve o bloco com o nome CLPRIN.INC. Rode o program 
EXEMPLO. que demonstro e comenta o potencial das funcoes 
de manipulacao de sprites implementadas. No mes que vein, 
completaremos as rotinas grdficas e acessaremos a inter 
pretador BASIC sem correr o risco de aborlar o programa, coso 
haja algum tipo de erro. 

Para terminer, e importante que exista a participacao dos 
leitores, enviando sugestoes. criticas, etc. aqui para CPU. Essa 
participacao determinard a prioridade e a forma com que os as 
suntos serao tratados no decorrer da serie. I 



CLPRIN.INC 



A>type clprim.inc 

type 

caracter=array [1. .8] of byte; 
spritel=caracter; 
sprite2=srray [1..32] of byte; 

var 

a: byte; { "Registradores v } 

hl.bc.de: integer; { do Z-80 } 
KeyBuf : array [ 1 . . 1 1 ] of byte ; 

Procedure Clprim ( ix: integer ); 
begin 

InLine ($13/ 

$3A/A/ 

$2A/HL/ 

$ED/$4B/BC/ 

$ED/$5B/DE/ 

$DD/$2A/IX/ 

$CD/*+18/ 

$32/A/ 

$22/HL/ 

$ED/$43/BC/ 

$ED/$53/DE/ 

$FB/ 

$C9/ 

$08/ 

$DB/$A8/ 

$F5/ 

$E6/$F0/ 

$ED/$73/$9A/$F3/ 

$C3/$F38C 



end; 



) 



TACO SOFTWARE 

MSH-TK 90X ■ AMIGA 



ELITE - 

MAIS QUE UM J0G0 UM ESTILO 

DEVIDA. 

PILOTE A NAVE MX III E SEJA UM 

MERCADORDASGALAXIAS. 

ACOMPANHA INCRIVEL MANUAL 

ELETRfJNICO INEDITO!!! 



ARQUIMEDES- ADVENTURE 
INCRIVEL ADVENTURE GRAFICO, 
VOCE ESTA NA BASE ARQUIME- 
DES, EM BUSCA DE SEU AMIGO 
SPOFITUS. QUE NAO RETORNOU A 
TERRA. REEDIQAO INEDITA EM 
PORTUGUESE 



JOGOS SERIE OURO - MSX 1 

ASTRO MARINE CORPS LIBERATOR MAMBO. ROAD WARS. FREDDY 
HARDEST 3 LICENCE TO HILL RENEGADE 3. AFTER THE WAR I ARTIC 
FOX. DESTROIER 

JOGOS SERIE ESPECIAL - MSX t 

AFTER BURNER ROBOCOP STRIHE FORCE HARRIER MASH II, TRAN 

TOR RESGATE OF THE ATLANTIDA. . 

JOGOS SERIE MEGARAM - MSX t 

NEMESIS 2. SALAMANDER. KINGS VALLEY 2. SAMURAI. PINGUIM AD 

VENTURE. LAY DOCH. CRAZE. GOUVELIOS 

JOGOS SERIE OURO - MSX 2 

HYDELIDE CHESS GAME 2 COSMIC SOLDIER DIABLO. WORLD GOLF 

TEST DRIVE, PERRY MANSON. LAYDOCH 

JOGOS SERIE MEGARAM - MSX 2.0 

ZANAC EX. HINOTORI. 1942. HEVIOUR ARHANOID II. ASH GUINE. IHARI 

WARRIOR. SUPER RAMBO ESPECIAL, ANDOROGYNUS. METAL GEAR 

- REMETA CHEQUE NOMINAL A TACO SOFTWARE LTDA 

- PEDIDO VIA VALE POSTAL. AGENCIA 404144 

- PRAZO DE ENTREGA EM 10 DIAS 

- GARANTIA DE 90 DIAS EM TODOS OS PRODUTOS 

- CONSULTE NOSSOS PRE?OS PARA PERIFERICOS 

- TABELADE PRECOS VALIDA ATE 31 .03.1990 

- SE PREFERIR MANDAR SEUS PROPRIOS DISCOS. ENTRE EM CONTA- 
TO (0132) 33-2037 

- A CADA 5 JGS S6RIE OURO MSX 1.0, MAIS 1 DISCO 

- A CADA 3 JGS SERIE OURO MSX 2.0 MAIS 1 DISCO 

- JOGOS SERIE MEGARAM E ESPECIAL. 1 JGO POR DISCO 

- SOLICITE CATALOGO COMPLETO 

- 05 JOGOS ELITE E ARQUIMEDES JA TEM SEUS PRECOS COM O DIS- 
CO INCLUIDO 

51«-31« 

-350.00 -420.00 
-250.00-320.00 
-200,00-270.00 

-40.00+ DISCO 
-55.00 + DISCO 

- 75.00 + DISCO 
-62.00 + DISCO 

- 92.00 + DISCO 
-46.00 

- 75.00 



ELITE + MANUAL + DISCO 
ARQUIMEDES HXI + DISCO 
SOMENTE O MANUAL DO ELITE 

JOGO SERIE OURO MSX 1 
JOGO SERIE ESPECIAL MSX 1 .0 
JOGO SERIE MEGARAM MSX 1 .0 
JOGO SERIE OURO MSX 2.0 
JOGO SERIE MEGARAM MSX 2.0 
DISCOS 1/4 DD 
DISCO 3 1/2 



TACO software Ltda 

Rua Joao Pessoa, IbSala 501/502 
Santos -SP- CEP 11010 



Caixa Postal 785 
Telefone (01 32) 33-2037 



LIVROS DA ALEPH 



curso de 
basic 
mUCV 



Banco de 
Dados 



Editor de 
textos 



Planillha 
de 

calculos 



Resumo 
de Basic 

Logo 
Hotword 
Hotdata 
Hotplan 



HOTPLAN 

: E3 \ 




COMO USAR 
SEU HOTBIT 




COMO RECEBER OS LIVROS EM SUA CASA! 

Os livros da ALEPH podem ser encontrados em livrarias, magazines e 

tojas de computacao. Se preferir, para sua maior comodidade e para 

aproveitar nossa promocao especial para os leitores da CPU, faca seu 

peddodiretarnente.AntesmesmodeligarseuMSX.mandeopedidoao 

ladopara: 

ALEPH PAP -Av Dr. LuisMigliano 1110 (£301 SBo Pauto-SP- 

CEP-05711 

e os livros serao enviados imediatamente por porte registrado: as 

despesas de correb correm por nossa conta e voc§ tera urn desconto 

especial! Malores Informagoes: (01 1 ) 843-3202 



Programas 

em Basic e 

LM. 







O MELHOR SOFTWARE PARA SEU MSX! 



proframacdo 

profiuional 

•m basic 




| l-ala iitata rapciu * 

■ .lit ('rKlMirui.li >; da / 



Auobapio f lnuilnm *■ 
(Oil) 826.5458 



LISTA DE PREQOS EM REAL LIVRO 

HOTDATA 14,7 

HOTWORD 13,2 

HOTPLAN 14,7 

COMO USAR SEU HOTBIT 22,5 

LINGUAGEM DE MAQUINA MSX 21,4 

PROGRAMACAO AVANCADA EM MSX .... 25,0 

TABELA DE MNEM6N1COS Z80 4,5 

HOTLOGO 14,9 

BASIC PARA CRIANCAS 19,2 

CURSO DE BASIC VOL.1 22,2 

PROGRAMACAO PROFISSIONAL EM BASIC . 28,5 

EXPERT PLUS-M.DE INSTRUCOES 29.5 

LINGUAGEM BASIC MSX . . . . • 31.5 

COLEQAO DE PROGRAM AS VOL.1 20,0 

COLEgAO DE PROGRAMAS VOL.2 21.6 

JOGOS DE HABILIDADE 14.9 

APROFUNDANDO-SE NO MSX 27,5 

100 DICAS PARA MSX 27.5 

+50 DICAS PARA MSX 29.5 

USANDO O DISK DRIVE NO MSX 27,5 

SISTEMA DE DISCO PARA MSX 20,4 

DRIVES-NOVOS HORIZONTES PARA SEU MSX 22,2 

EXPERT DD PLUS-M.DE INSTRUCOES .... 28,0 

CURSO DE MUS1CA MSX 20,4 

DESENHOS BASICOS NO MSX 18,3 

ASTROLOGIA NO MSX 24,9 

CIRCUITOS ELETR6N1COS MSX 27,5 

REAL uvro 6 a unidade monetaria estabelecida pela 
CAMERA BRASILEIRA DO LIVRO, cuja corrosponddnda atual e 

1 REAL LIVRO = NCz$ 70,00 



SIM 



quero receber pelo correio por porte 
registrado os ivros discriminados abaixo: 



Tiub 



TOTAL EM REAL LIVRO 



VALOR DO REAL 70,00 



TOTAL EM NCz$ 



Desconto15%(al§ 30/03/90) 



VALOR A PAGAR — NCz$ 



Prego 



Estou erMando urn cheque caizado nominal k ALEPH 

PAP. Uda do banco n 8 agenda n° 

no valor de nCz$ para receber os Ivros 

hdicados adma sem outras despesas de minha parte. 

NOME: 

END: 

CEP: CIDADE: UF: 

Tenho um drive de (_)5 1/4" (_)3 1/2"equero receber 

urn cat^bgo dos kits (IK/ro+ disco). 

J 



PASLIB1. INC 



Procedure Beep; 
begin 

Clprim ($00C0) 
end; 

Procedure FillVram (x : byte ;y,z: integer); 
begin 

a:=x; 

hlrsyj 

bc:=z; 

Clprim ($0056) 
end; 

Function Stick (x: byte). -byte; 
begin 

a:=x; 

Clprim ($00D5); 

Stick: =a 
end; 

Function Trig (x: byte): boolean; 
begin 

a:=x; 

Clprim ($00D8); 

Trig:=(a=255) 
end; 

Procedure GraphMode (x.byte); 
begin 
a:=x; 

Clprim ($005F); 
if x=0 then mem[$F3B0] : =40 

else if x=l then mem[$F3B0] :=32; 
mem [$FCB3]:=0; 
mem [$FCB5]:=0 
end; 

Procedure Color (x,y,z:byte); 
begin 

mem [$F3E9]:=x; 

mem [$F3EA]:=y; 

mem [$F3EB]:=z; 

Clprim ($0062) 
end; 

Function Vpeek (x: integer): byte; 
begin 

hi: sat; 

Clprim ($004A); 

vpeek : =a 
end; 

Procedure Vpoke (x:integer;b:byte); 
begin 
a:=b; 
hi : =x; 
inline ( $F3/ 

$2A/HL/ 

$990E/ 

$69ED/ 
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$F4CB/ 
$61ED/ 
$3A/A/ 
$98D3/ 
$FB 

) 
end; 

Procedure Pause; 
begin 

Clprim ($009F) 
end; 

Procedure LimpSpr; 
begin 

Clprim ($0069) 
end; 

Procedure Vrjnem ( a , b , c : integer ) ; 
begin 
be : =c ; 
de:=a; 
hl:=b; 

Clprim ($0059) 
end; 
Procedure Mem_vr ( a, b,c: integer); 
begin 
bc:=c; 
de:=a; 
hl:=b; 

Clprim ($005C) 
end; 
Procedure PutSprite (b,d,c,e:byte); 
var 

aux: integer; 
begin 
a : =b ; 



*nHH>afiLtt»iras& 



DRIVE 5V4 

PLACA 80 COLUNAS 

MODEM DE COMUNtCACAO 



INTERFACE DUPLA P/DRIVE 
IMPRESSORAS 
TRANSFORMACAO P/2.0 



• MONITORES 

• EXPANSOR DE SLOT (C/4SLOTS) 
> OABINETE P/DRIVE C/ FONTE FRIA 



* PacotSo «n Disco: 100 logos (escolher) + 5 apiicatlvos + 10 discos NCzS 900,00 

Solicits no$*o catalogo do programs*. Alandimoi todos os estados em 24 haras via SEDEX. 
Para fazor sou podtdo anvie cheque nominal com carta dotalhada para MSX-SOFT INFORM ATICA. 




: HI - Av. 28 da Soiambro. 226 Loja 110 ■ VILA SHOfflMG RJ - CEP 20551 - TILS. .(021 1 284-67*1 • 2S4-1M9 
FBW CurMha: • Av. 7 de Satamaro, 3. 14« Loja 20 ■ SHOPPING SETE - CURIT1BA PR - CEP 80010 - TEL: (041 ) 232-039* 
FWal Slo Paulo: Caixa Poatal 20217. CEP 04043 • TEL: (011) B79-S080 



*0 ft 
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Clprim ($0087); 

aux:=hl; 

vpoke (aux,e); 

vpoke (aux+l,d); 

vpoke (aux+3,e) 
end; 
Function GetPat (x: byte): integer; 
begin 

a:=x; 

Clprim ($0084); 

GetPat :=hl 
end; 

Procedure CreateSprl (x:byte;y:spritel); 
var 

aux , auxl : integer ; 
begin 

auxl:=GetPat (x); 
for aux:=0 to 7 do 

Vpoke (auxl+aux,y[aux+lj) 
end; 
Procedure CreateSpr2 (x:byte;y:sprite2); 
var 

aux, auxl : integer; 
begin 

auxl:=GetPat (x); 
for aux:=0 to 31 do 

Vpoke ( aux 1+aux , y [ aux+ 1 ] ) 
end; 
Procedure Size (x:byte); 
begin 

bc:=mem [$F3E0]*256+1; 
if x=l then bc:=bc or 512 

else bc:=bc and (not(512)); 
Clprim ($0047) 
end; 
Procedure Magnitude (x:byte); 
begin 

bc:=mem [$F3E0]*256+1; 
if x=l then bc:=bc or 256 

else bc:=bc and (not(256)); 
Clprim ($0047) 
end; 



5EDE WQRMffNCfl 



CURSOS DE BASIC/MSX, DBASE I I/I 1 1 PLUS, TURBO PASCAL 

ItSX PC USX PC «SX « GRANDE ACERVO DE JOGOS E APLICATIWS PARA KSX. A SUA LOJA NO INTERIOR « KSX PC HSX PC KSX 



PROMOCAO 13 por 10 ; 



adquirindo li df 
ganna intfirantnte 
3 jogos a sua escolh*. E ten 
na|s, na coHpra at qiulquer fquipaMento 
(Micros. lNprtssoras ou drives) woe* 
ganha 20 progra*as it BRINM. 



(WIS 



Disquetes 
ntrolf d* Bancos, Fl 



VERBATIM / NASHUA / ABC SYSTEMS COLOR - Porta Disguft 
s_-„ Etigujtas - Fita Cass*te - Monltores - Micros 
S.I/f.t I 1/2 - Iwrtssoras ELDM / RIMA / . 

tenasesptcihcos para PCV MSX - Contro t 
tas Fiscais, Ftdido, Conias a Pagar/Reoebe . 
uxo it Caixa, Contaoilidade, Mala lirt 
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EXEMPLO. PAS 



{$i clprim.inc} { Inclui Clprim } 

{$i paslibl.inc} { Inclui Bibliotecal } 

const 

Raio=70; 

Pi=3.1415; 

def =100; 

sl:sprite2=(3,15,31,63,63,127,127,127, 
127,127,63,63,31,15,3,0, 
192,240,248,252,252,254,254,254, 
254,254,252,252,248,240,192,0); 

{ tipo Sprite2 e urn Sprite de 16x16 } 

{ pixels, definidos por 32 bytes como } 

{ no BASIC } 

var 
PosX,PosY: array [l..def] of byte; 
ang,da:real; 
cont , vezes : byte ; 

begin 

da:=(2*Pi/def); 

ang:=0; 

for hl:=l to def do begin 

PosX[hl]:=trunc (Raio*Cos(ang)); 
PosY[hl]:=trunc (Raio*Sin(ang)); 
ang : =ang+da 
end; 

{ Note que como hi foi definida como } 
{ uma variavel global, ela pode ser } 
{ usada sem problemas em lugares onde } 
{ Clprim nao seja acessada. } 

GraphMode (1); { Screen (1) } 
Size (1); 
Magnitude (1); 

{ Experimente Magnitude (0) } 
LimpSpr; 

for cont:=0 to 5 do CreateSpr2 (cont, si); 
{ Definicao dos Sprites } 
for vezes :=1 to 10 do 

for cont:=l to def do begin 

PutSprite (0, 100+PosX[cont],80+PosY[cont],3); 
PutSprite (1, 100-PosX[cont] ,80-PosY[cont] ,8); 
PutSprite (2, 100+PosX[cont] ,80, 10); 
PutSprite (4, 100,80+PosY[cont],15); 
delay (8); 

{ Experimente diminuir o argumento de Delay } 
end; 
GraphMode (0); 
end. 
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L i v ro S 



DESENHOS BASICOS 
PARA MSX 



DIVINO C. R. LEITAO 



AEdilora Aleph colocou, recen- 
temente, no mercado, um novo 
livro para MSX, desta vez diri 
gido aos apreciadores de arles grdficos, 
de autoria de Corvalho Lima, que inicia 
brilhantemente sua obra com uma ci- 
ta^ao de Isaac Asimov — "Eu lento en- 
sinor aos outros porque, seja oo nao 
bem sucedido, eu invariavelmente con 
sigo ensinara mim mesmo". 

Apos leilura atenla e execucao de al 
gumas rolinas, fiquei algo decepcio 
nado, pois nao enconlrei grandes no 
vidades. Mas comigo nao vale, pois ar 
les grdficas sao meu lorte no compu 
tador e minha decepcao foi em virtude 
de nao enconlrar algo novo para o meu 
uso. Porem, identiliquei no decorrer da 
obra alguns dos meus maiores tormen- 
los da epoca que ainda engatinhava 
pelos "pixels" dos micros. Eles eslavam 
la. explicadinhos. de uma forma que nin 
guem explicou quando eu estava apren 
dendo. 

No livro, sao Iratados com a mesma 



desenvoltura e clarezo, desde um sim 
pies comando PSET ate a tenebrosa 
trigonometria, com seus sendides e 
outros fantasmas que assustam os 
desavisados. Com uma linguogem bem 
diddtica e com pontadas de humor, o 
actor leva os usudrios ao interessante 
mundo dos grdficos. Se nao sabe sequer 
tracar uma linha reta, este livro foi feito 
para voce; para os que jd dominam os 
comandos grdficos do MSX, pouco hd a 
acrescentar. 

Sob um selo bem adequado, "serie 
diddtica", Desenhos Bdsicos para MSX 
pode se revelar um bom auxiliar a 
professores de desenho ou geometria 
que se interessem em usar o micro 
como apoio ao ensino. Todos os exem 
plos sao acompanhados de exercicios 
relativos ao assunto tratado e com res 
posta no final da obra. Alguns efeitos 
sao bastantes interessantes. 

No final do livro, existem algumas 
tabelas quadriculadas com a represen 
tacao dos modos de tela screen 1 e 2, e 



ai vale uma critica, com relacao a cores 
eolhida para estas tabelas, fundo ozul e 
tra<;os em branco. alem de uma pessima 
visualizacdo, que impedem a copia das 
tabelas em xerox, o que seria muito util 
aos usudrios do livro 

Achei que a screen 3 que possui recur 
sos, como o proprio autor diz, misterio 
sos, continuou misteriosa, pois foi 
pouco explorada pela obra, assim como 
o fantdstico macro comando DRAW, do 
qual foram esquecidos alguns recur 
sos, como o comando x, que permile 
chamar uma sub rotina DRAW dentro de 
outra. 

CONCLUSAO 

No geral, e uma boa obra, talvez um 
pouco curta, o que pode ser uma carac 
terlstica da serie que representa. Re 
comendo a como um complemento ao 
manual do micro pora os iniciantes e 
tambem como um estudo de aplicacao 
da geometria no micro MSX. 



ABASTECA O SEU MSX NA FARAHS 



SOFTWARE 

APLCATIVOS E JOGOS, 
MALA DIRETA, 
CONTROLE DE 
ESTOQUE, ETC. 

HARDWARE 

HOT. BIT DISKDRIVES, 
MONITORES. MEGARAM. 
CARTAO 80 COLUNAS, 
EXPANSOR DE SLOT, 
TURBO 2.0 ETC... 

CURSOS 

INTRODUCAO AO 

PROCESSAMENTO 

DE DADOS. 

SISTEMA OPERACIONAL 

(MS-DOS), COMPUTACAO 

GRAFICA, LOTUS 1 2 3 

(BASICO E AVANCADO) 



OESPACHAMOS P/TOOO O BRASIL. 



COMPUTADORES 

• 16 BITS - IBM - PC 
8 BITS - MSX 
TITAN XT - HOTBIT 

• ESTABILIZADORES 

• NO-BREAK'S 

• FILTROS DE LINHA 

• WINCHESTERS 

20 -30 -40 -80 -160 MB 

• MOBILlARIOS PARA CPD'S 

• COMUTADORES 
P/IMPRESSORAS 

• ABAFADORES 
P/IMPRESSORAS 



BUREAU DE SERVICOS 

PROCESSAMENTO DE TEXTO, 
EMISSAO DE ETIQUETAS, 
MALA DIRETA - CARTAS, 
TRABALHOS ESCOLARES 



SUPRIMENTOS 

• FORMULARIOS CONTfNUOS 
INTERPRINT - TELEXPEL 
TODAS VIAS/MODELOS 
BRANCO EZEBRADO 

• FORMULARIOS ESPECIAIS 

DARP - DARF - RAIZ - FGTS - RAIS 
RECIBOS DE PAGTO., VERGE 

• MINI PACK 

MICRO SERRILHADO 240 X 1 1 
BRANCO, ZEBRADO - AZ UL - VERDE 

• PASTAS P/FORM. CONTlNUO 
80 E 132 COL. 

• BOBINAS P/FAX PELIKAN/NACIONAIS 

• DISKETES NASHUA/VERBATIN 



SERVICOS 

• TRANFORME SEU 
MSX DE 1.0 PARA 2.0 

• OPQAO PARA 2» 
DRIVE 

• CONSERTOS EM 
GERAL COM RAPIDEZ 
E GARANTIA 



SOFTWARE HOUSE 16 BITS 

• DESENVOLVIMENTO 

DE API ICATIVOR FSPEClFICOS 

• MALA DIRETA - EMISSAO 
DE ETIQUETAS 

• SISTEMA DE GERENCIAMENTO 
IMOBILlARIO 

• SISTEMA DE GERENCIAMENTO 
DE CLlNICAS 

• CONTROLE DE ESTOQUE 

• SISTEMA DE CONTROLE 
BANCARIO 

• SISTEMA DE GERENCIAMENTO 
DE BIBLIOTECA 

FACA-NOS UMA VBfTA. 



FARAH S INFORMATICA 



RUA SAO BEKTO, 385 - S/LOJA - CENTRO ■ SP - CEP 01011 
TELS.: (011)324691/34-6243 - 9097/36-2008 
FAC SfMILE 36-6707 TELEX (1 1) 22457 - AFIJ - BR 
A 50 METROS DA ESTAgAO METRO (SAO BENTO) 
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AGUIA 

INJFORIVlATIC/V 



PERIFERICOS 




i -■ 



31/2. 



TUDO PARA MSX 




TECLADOS 

RS232 

TERMINAL 

TELEX PARA MSX 

PROGRAMAS 

SCREEN IV 

MSX BUG 

E MUITOS OUTROS 



DRIVE 
51/4" 




EXPANSOR 
DE SLOTS 






DISKETES 




ENTREGA IMEDIATA 

AGUIA INFORMATICA LTDA. 

Av. N.S. de Copacabana, 605/804 - Copacabana 
Telex: 21 21 717 KPUR - Tel.: (021) 235 3541 
Rio de Janeiro - RJ - CEP 22040 




PROGRAMA 

UtilitariO 



DRAWER 
Sistema Editor 



RE NA TO PAULO DE MELLO 



O Drawer — Sistema Editor tern por finalidade (acilitar a 
utilizacao do comando DRAW, criando um arquivo no formato 
BASIC, que podera ser facilmente implementado em outros 
programas, atravfes do MERGE. 

O programa fe dividido em duos partes distintas: 

— Tela de Edicao 

— Menu Principal 

Tela de Edicao: 

Nesta tela, pode-se desenhar livremente com o auxllio das 
teclas demovimentacaodo cursor, tendo-se 6 disposicdo alguns 
recursos, os quais podem ser acessados atravfes das teclas de 
fun(5es. 

As opcoes posslveis sdo: 

— RISCAR / NAO RISCAR — esta opcdo 6 conseguida atravfes 
da tecla de funcao F-l. Ela funciono como uma chave liga / 
desliga. O cursor, em formato de seta, quando representado 
cheio, indica que a funcao est6 ativa Caso contrbrio, o cursor 
sera vazado. 

— SELECIONAR CORES — a tecla F-2 mostra a paleta de 
cores, as quois poderao ser selecionadas com o auxllio das 
teclas do cursor para cimo e para baixo. Confirma-se a cor com 
< ENTER > . 

A cor da borda da tela indica a cor em uso. 
A teclo< BS > aborta a funcao. 

— GRID — e acessado atravfes da tecla F-3. E desenhado na 
tela um reticulado (GRID) 8X8. Tern a funcao liga/desliga. 

— APAGAR — pode-se apagar parte de um desenho teclan- 
do-se F-4. Sera solicitado o numero de pixels a serem apa- 
gados. O valor inicial fe igual a 15. Este valor podera ser in- 
crementado ou decrementado com as teclas do cursor para 
cima e para baixo. Para que a operacao seja efetuada, basta 
pressionarmos < ENTER > . 

O numero mdximo de pixels a serem apagados em uma 
operacao fe de 255 pixels. 

A tecla <ESC> abandona a funcao. 

— MENU PRINCIPAL — fe acessado com a tecla F-5. 

Menu Principal: 

Nesta tela, poderemos selecionar a opcao desejada com o 
auxilio dos teclas do cursor para cima e para baixo confirman- 
docom<RETURN>. 



As op;oes sao: 

a) MOSTRAR TELA — mostra a tela que est6 sendo editado. 
Para voltar ao menu, pressione<ENTER >. 

b) LISTAR COMANDOS — imprime os comandos no formato 
BASIC com numeracao a portir de 50.000. Serd solicitado a es- 
cala desejada, bem como o sistema de coordenadas a ser em- 
pregado. Os valores para a escala devem estar entre 1 a 255 
enquanto que para a coordenada, entre e 3. 

Os dados digitados podem ser corrigidos com<CBS > . 

Para manter os valores "default", basta teclarmos<ENTER>. 

Ap6s o processamento, serd efetuada a listagem. 

c) GRAVAR NO FORMATO BASIC — grava em disco ou em 
fita um arquivo de linhas "DRAW" que poderd ser implemen- 
tado em outros programas em BASIC com o MERGE. Serd so- 
licitado a soldo a ser utilizada (disco/fita), o nome do pro- 
grama, a escala e o sistema de coordenadas. Todas as infor- 
macoes dadas para a opcao "b" (Listar comando) sao v6lidas 
para esta opcao. 

Ap6s o processamento serd executada a gravacao. 

d) GRAVAR ARQUIVO — permite gravar em disco ou fita um 
arquivo da tela de edicao. Serd pedido o meio de saida (dis- 
co/fita) bem como o nome do arquivo a ser gravado. 

e) LER ARQUIVO — permite recuperar do disco ou fita um ar- 
quivo previamente gravado para que se possa continuar sua 
edicao. Serd pedido o meio de entrada (disco/fita) e o nome do 
arquivo a ser corregodo. 

f) EXIBIR DIRET6RIO DO DISCO — mostra o conteudo e o es- 
paco disponlvel do disco no drive "A". Ndo permite selecdo do 
drive. 

g) VOLTAR AO MODO DE EDICAO— permite continuar/ 
comecar a edicflo de uma tela. 

h) APAGAR O QUE FOI FEITO — apaga da memdria todo o 
trabalho realizado. Serd pedido a confirmacoo. 
i) VOLTAR AO BASIC — encerra o programa. 



OBSERVACOES. 

1) Sempre antes de uma soldo no formato BASIC (disco, fita 
ou impressora) fe feito a montagem dos comandos. O tempo 
gasto para o processamento serd proporcionol ao tamanho e d 
complexidade do desenho. O tempo mfedio gasto para uma 
tela que utilize todo o espaco disponivel para edicao fe de 05 
minutos. 
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Para que o usudrio nao tenha a impressao de que o micro 
"congelou", foi implementada uma tela para que se possa ler 
um acompanhamento visual do processo. 

Este processo. uma vez leito, nao serd mois ulilizado ate que 
se volte a editor a tela, que se apague o que foi feito ou, en 
too, um novo arquivo sejo carregado. 

2) O programa guarda uma 6rea de trabalho suficientemen- 
te grande para a elaboracao de desenhos com relativo grau de 
complexidade. Caso este limite seja ultrapossado, sera dado 
um aviso e as unicas teclas que funcionarao serdo F-4 (apagar) 
e F-5 (menu). 

Quando um desenho for excessivamente grande e com- 
plexo, os limites da rotina de montagem dos comandos po- 
derao ser ultrapassados. Nestes casos (roros), o processamen- 
to serd interrompido com a mensagem "Muito complexo" e o 
processamento ser6 desviado para o menu principal. A partir 
deste momento, todas as fun^oes de salda no formato BASIC 
serdo efetuados somente ate os limites de processamento. 

3) O programa nao permite a selecao do drive utilizado. 
Todas as operacoes que utilizem este meio serdo realizadas no 
drive "A". 

4) No op^ao Disco, sempre antes do programa efetuar uma 
grava^ao, ele verifica se j6 existe um programa com mesmo 
nome. Caso j6 exista um arquivo/programa semelhante, serd 
solicitada a confirma;3o. 

5) Todas a operates de entrada de dados via teclado, 
podem ser interrompidas com a tecla < ESC>. 

6) Os valores "default" adotados pelo programa para a es- 
cala e as coordenadas sao quatro (04) e zero (00), respecti- 
vamente. O meio de salda "default" adotado pelo sistema e o 
disco. 

Para que o programa assuma os valores "default", basta 
teclarmos < ENTER > em resposta ao dado solicitado. 

CONSIDERACOES SOBRE O PROGRAMA 



O programa faz uso de uma pequena rotina em linguagem 
de mdquina para criar o GRID, a qual estd alocada a partir do 
endereco &HD000. Alem dela, o programa utiliza mais duas 
rotinas da ROM, que sao: 

— DEFUSR1 = 8H156 — Limpa buffer de teclado. 

— DEFUSR2= 8H3E — Reestobelece as teclas de funcao. 

— Foi elaborada uma rotina de tratamento de erros que con- 
torna a maioria das situa?6es. Mesmo que ocorra um erro nao 
definido (tentativa de se trabalhar com um arquivo nao pa- 
drao, por exemplo), o programa nao serd finalizado. Serd 
apresentado, nestes casos, a mensagem "ERRO DE PROCES- 
SAMENTO". Portanto, durante a fase de depuracao do pro- 
grama, e aconselhdvel mudar a linha 3600 para : 

3600 SCREEN 0,,1:COLOR 15,4:PRINT "Erro n°", ERR; "na li- 
nha"; ERL: LIST.:END 

Deste modo, sempre que ocorrer um erro, ser6 dado o 
numero do erro, a linha em que ele ocorreu e id serd listada a 
linha com problemas. 

Apos o programa estar definitivamente editado, voce deverd 
colocar novamente a linha original. 

3600 SCREEN 0:COLOR 15,4:PRINT "Erro de processamento" 

— Como o programa desativa as teclos< CTRL+STOP>, e 
aconselhdvel a grava^ao do programa antes de sua execucao. 

— Buscando a economia de memdria, o programa peca pela 
sua clareza e falta de comentdrios no interior de sua listagem. 
Para tentar sanar um pouco o problema, e dado, o seguir, uma 
tabela de linhas com uma breve descri<;ao. 



TABELADELINHAS 



20 — 260 — Rotina de montagem de comandos. 

280 — 310 — Tratamento das interrupqoes. 

330 — 750 — Rotina principal. 

770 — 860 — Rotinas auxiliares. 

880 — 1010 — F-'l — Risca / nao risco, 
1 030 — 1 1 80 — F -2 — Seleciona cor. 
1200— 1230— F 3 — Grid. 
1250— 1710 — F 4— Apagar. 



1730— 1740 — Mostra DRAW. 

1760— 1980— F-5— Menu principal. 

2000 — 2020 — Mostra tela. 

2040 — 2080 — Listar comandos. 

2100 — 2190 — Gravar formato BASIC. 

2210 — 2230 — Rotinas auxiliares. 

2250 — 2470 — Entra escala / coordenadas. 

2490 — 2630 — Gravar arquivo. 

2650 — 2730 — Teste de existencio de arquivo igual 

2750 — 2860 — Ler arquivo. 

2880 — 2930 — Seleciona disco/fita. 

2950 — 2960 — Mostra diretdrio. 

2970 — 3120 — Entra nome arquivo/programa. 

3140 — 3150— Voltaa editor. 

31 70 — 3220 — Apagar tudo. 

3240 — 3250 — Voltar ao BASIC. 

3260 — 3280 — Existem comandos? 

3300 — 3370 — Rotina salda formato BASIC. 

3390 — 3490 — lnicializa<;oo. 

3510 — 3670 — Rotina de tratamento de erros. 

3690 — 3720 — Aviso de limite "estourado". 

3740 — 3820 — Abertura. 

3830 — 3900 - DATA'S L.M.e SPRITES. 



Dados doautor: 

RENATO PAULO DE MELLO — formado 

em Processamento de Dados 

pela UTESC — JOINVILLE (SC) 

Autor dos programas SOBRA 

UMeCRIPTOARITMETICA 

publicado na edii;ao n° 1 1 . 



TOYGAMES INFORM ATI C A 

A Toygames InformStica dispoe dos melhores jogos para 
o seu MSX, oferecendo qualidade profissional, novidades 
internacionais e garantia de seus services. 

PROMOgAO 

• A cada dez jogos um jogo gratis 

• Preco especial para pacote de 100 jogos 



PERIFERICOS 

• Drives 5 1/4 e 3 1/2 

• Impressoras 

• Modems 

• Monitores 



SUPRIMENTOS 

• Fita para impressora 

• Disketes5 1/4 e 3 1/2 

• Formulario conttnuo 

• Etiquetas 

• Livros e revistas 



Solicite nosso 
catalogo gratis 
Despachamos 
para todo o Brasil 
Aberto aos s^bados 
da 9:00 as 16:00 hs. 






Caixa Postal 30961 - CEP 01051 

SSo Paulo - S.P.-Fone: (011) 277-4878 

Rua Galvao Bueno, 714- Conj. 16-Liberdade-SP 

Prdximo EstacSo Metr6 SSo Joaauim 



1 • 

2 • 

3 ' 

4 ' 



DRAWER - MSX 
versSo 1.0 - 1989 

5 ' Autor:Renato Paulo de Mello 

6 ' Joinville - SC 

7 ' 

8 ' — I == 

9 ' 

10 Cl£AR8300,&HCFFF:DEFII , Nn"A-2:GOTC3280 
20 W**"":Y«="":FORI=0TO9:M*(I)="":NEXT 
30 avt=14:FD=l:CT=0:V=0:LA=((K)K250)+LEN(D 
*( K) ) ) \8jTN=0:GOSUB780:LOCATE5, 11 : PRINT" 
*** Aguarde processamento ***" 

40 L0CATE13,14:PRINT" ! ! " 

50 L0CATE13,15:PRINT"! 1 !" 

60 L0CATE13,16:PRINT"! ! !" 

70 L0CATE13,17:PRINT M ! !" 

80 FORI=0TOK:FORJ=1TOLEN(D*( I ) ) :X*=MID*( 

D*(I),J,1):TN=TT\H-1 

90 IFTN>U^THENQ»»=CN+-1:LC)CATECN,16:PRINT" 

. !":TN=0:BEEP 

100 T=INSTR("urdlefgh",X*) 

110 IFT=0TVENGOSUB230:GOTO150 

120 IFW*=""1>€NW*=X*:6OTO150 

130 IFW*=X*1>ENCT=CT+1:GOTO150 

140 GOSUB170 

150 NEXTJ,I:GOSUB170 

160 LaCATE22,16:BEEP:PRINT". !":RETURN 

170 CT=CT+1:Q$=STR*(CT) 

180 IFLEN(M*(V))>230THENV=V+1 

190 IFV>9T>HENV=9:ERR0R99 

200 IF CT=1 TVEN M«(V)=M*(V)-H»J$:GOTO220 

210 M»(V)=M*(V)+W*+RIGHT*(Q$,LEN(Q*)-1) 

220 CT=0:W*=X*: RETURN 

230 IFX*= ,, b"THENX*=X*+MID*(D*( I ) ,J+1 ,1 ) : 

J=J+1 

240 IFW«="""nHENM*(V)=M*(V)+X*: RETURN 

250 IFCT>0ORW»O""T>ENGOSUB170 

260 M*(V)=m(V)+X*:W*="":RETURN 

270 ' 

280 ONBTCFGOSLIB430:STOPON 

290 ONERRORGOTO3510 

300 GOSUB3390 

310 ONKEYBOSUB880, 1030, 1200, 1250, 1760 

320 ' 

330 IF FLA6=1T>ENDRAW"M=X;,=Y;C=C;" 

340 PUTSPRITEN3,(X,Y),CS,NB 

350 IF L£N(D*(K))>244THENK=K+i 

360 IF K>20THEN K=20:EX=1:GOSUB3690 

370 A*STICK(0) 

380 ON A GOSUB400,440,490, 530, 580,620,67 

0,710 

390 BOTO330 

400 IFY=0THENY=0: RETURN 



410 Y=Y-1 

420 IFFLA6=lTVEND*(K)=D*(K)+"u" 

430 RETURN 

440 I FY=01>ENY=0: RETURN 

450 IFX=255THENX=255: RETURN 

460 Y=Y-1:X=X+1 

470 IFFLAG=11>CND«(K)=D*(K)V'e" 

480 RETURN 

490 I FX=255THENX=255: RETURN 

500 X=X+1 

510 IFFLAG=lTHEND*(K)=D*(K)+"r" 

520 RETURN 

530 IFY=191T1-ENY=191: RETURN 

540 IFX=255TI-ENX=255: RETURN 

550 Y=Y+1:X=X+1 

560 IFFLAG=lTI-END«(K)=D«(K)+"f" 

570 RETURN 

580 IFY=191T>ENY=191: RETURN 

590 Y=Y+1 

600 IFFLAG=n>END*(K)=D*(K)+"d" 

610 RETURN 

620 IFY=191TVENY=191:RETURN 

630 I FX=0THENX=0: RETURN 

640 Y=Y+1:X=X-1 

650 IFFLAG=lTHEND*(K)=D*(K)+"g" 

660 RETURN 

670 I FX=0THENX=0: RETURN 

680 X=X-1 

690 IFFLAB=1THEND*(K)=D«(K)+"1" 

700 RETURN 

710 I FY=0THENY=0: RETURN 

720 IFX=0THENX=0: RETURN 

730 Y=Y-1:X=X-1 

740 IF FLAG=lTHEND*(K)=D*(K)rt-"h" 

750 RETURN 

760 ' 

770 L*=STR*(CT):D*(K)=D*(K)+Z$+RIGHT*(L* 

,LEN(L*)-1) :CT=0:Z*="":RETURN 

780 FORI=4TO22:LOCATE0,I:PRINTSPC(38):NE 

XT: RETURN 

790 L0CATE5,22:PRINT"Tecle <RETURN> para 

continuar" 
800 A=USR1(0) 
810 A*=INKEY* 

820 IFA»OCHR*( 13 )TVENB10ELSEBEEP: RETURN 
830 L0CATE5,2i:PRINT"Tecle <RETURN> para 

continuar. ":L0CATE5,22:PRINT"Tecle <ESC 
> para cancelar. ":A=USR1(0) 

840 A*=INKEY* 

850 IFA*=OF«(27)'n-ENBEEP:RETURN1780 
860 IFA$OCHR$( 13 )1>CNB40ELSEBEEP: RETURN 
870 ' 

8B0 PUTSPRITENS,(0,209),0,NS:NS=NSXOR1:P 
UTSPRITENS, ( X ,Y) ,CS,NS:BEEP 
890 IFFLAG=2THENFLAB=1:BOTO990 
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900 IFF1_AG=1THENFU^G=0:X1=X:Y1=Y:RETURN 

910 FLAG=1 

920 X0=X-X1:Y0=Y-Y1 

930 IFX=X1THEN 960 

940 IFX>XiTHENZ*="br"ELSEZ*="bl" 

950 CT=ABS ( X0 ) : GOSUB770 

960 IFY=Y1THENRETURN 

970 IFY>YiTHENZ*="bd"ELSEZ*="bu" 

980 CT=ABS(Y0):GOSUB770: RETURN 

990 Z*="bm":CT=X:GOSUB770 

1000 Z*=",":CT=Y:GOSUB770 

1010 Z*="c":CT=C:GOSUB770: RETURN 

1020 ' 

1030 FORI=1T05:KEY(I)CFF:NEXT:BEEP:PUTSP 

RITE1, (0,209), 15, l:L=l:LINE(0,7)-(25, 160 

>,1,BF 

1040 FORI=0TO140STEP10:LIISE(10,10+I)-(20 

,15+I),L,BF:L=L+1:NEXT:LINE<10,10)-(20,1 

5) ,15,B:L=C*10+2:A=USR1(0) 

1050 A=STICK(0) 

1060 PUTSPRITE0,(17,L),15,0 

1070 IFA=1THEN IFL>12THENL=L-10 

1080 IFA=5THEN IFL<152THENL=L+10 

1090 A*=INKEY* 

1100 IFA«=CHR«(27)T]-ENBEEP:GOTO1160 

1110 IFA*OQHRt(13)THEN1050 

1120 BEEP:CT=L\10 

1130 IFC=CTTHEN 1160ELSEC=CT:Z*="c" 

1140 IFD*(0)=""THEN1160 

1150 GOSUB770 

1160 LINE(0,9)-(25,160),1,BF:COLOR,,C 

1170 PUTSPRITE0, (0,209), 15, 0:GOSUB1730 

1180 FORI=1T05:KEY(I)ON:NEXT:RETURN 

1190 ' 

1200 FORI=1T05:KEY(I)OFF:NEXT:BEEP:CS=CS 
XOR 11 

1210 IF GRID=1THENGRID=0:CLS:GOTO1230 
1220 GRID=1 

1230 GOSUB1730:FORI=1TO5:KEY(I)ON:NEXT:R 

ETURN 

1240 ' 

1250 COLOR,, C:L=15:IFD*(0)=""T>ENRETURN 

1260 F0RI=1T05:KEY(I)0FF:NEXT:BEEP 

1270 ANJSRl(0):CFEN"grp:"FOROUTPUTAS#i 

1280 IF GRID=1THENCN=1 ELSECN=15 

1290 IF Y<100THENLA=145 ELSELA=0 

1300 LIf^(188,8+LA)-(252,41-H_A),CN,B 

1310 LirsE(190,10+LA)-(250,39+LA),CN,BF 

1320 COLORCN X0R14:PSET(195,LA+13) ,CN:PR 

INT#1 , "Pixels?" :PSET(207,LA+25) ,CN:PRINT 

#1,USING"###";L 

1330 A*=INKEY* 

1340 IF A*<>OR*(31)ANDA*<>D-f»(30)ANDA* 
<>CHR$ ( 13 ) ANDAtOCHR* ( 27 ) THEN1330 
1350 BEEP 



1360 IFA*=OR*(13)THEN 1430 

1370 IFA$=CHR*(31)THEN L=L-1 

1380 IFA*=CHR*(30)THEN L=L+1 

1390 IFA*=CHR*(27)THEN 1690 

1400 IFL<1 THEN L=255 

1410 IFL>255THENL=1 

1420 LINE(205,20+LA)-(240,35+LA),CN,BF:P 

SET(207,25+LA),CN:PRINT#1,USINB"###";L:G 
OTO1330 

1430 LINE(190,10+LA)-(250,39+LA),CN,BF:P 

SET( 195, 19-H.A) ,CN:PRINT#1 , "Aguarde" 

1440 X$="udrleg-fhcm":CT=0:CT*="":EX=0 

1450 FORI=KTO STEP-1:TA=LEN(D»( I) ) 

1460 FORJ=TA T02STEP-1:R*=MID»(D»(I),J,1 

):T=INSTR(X*,R*) 

1470 IF T=9 THENC2=1:GOTO1530 

1480 IF T=10THENGOSUB1650:GOTO1660 

1490 IF T=0 THEN1530 

1500 IF J>1 THENIF MID*(D*( I ) ,J-l,l)="b" 

THEN 1530 

1510 CT=CT+1 

1520 IF CT>LTHEN1540 

1530 NEXTJ,I 

1540 B*=L£FT*(D*(I),J) 

1550 FOR J=ITOK:D*(J)="":NEXT:K=I 

1560 D*(K)=B* 

1570 IF BRID=0THENCLS 

1580 GOSUB1730 

1590 X=PEEK(&HFCB3):Y=PEEK(&HFCB5) 

1600 IFT=1THEN Y=Y-1:GOTO1630 

1610 IFT=5THEN Y=Y-l:X=X+i:GOTO1630 

1620 IFT=8THEN Y=Y-l:X=X-i:GOTO1630 

1630 IFC2=1THEN CT=C:Z*="c":GOSUB770 

1640 X1=X:Y1=Y:FUTSPRITE NS, (X,Y) ,CS,N5 

1650 C0L0R,,C:CL0SE:F0RI=1T05:KEY(I)0N:N 

EXT: RETURN 

1660 ERASED*:DIMD$(20):FLAG=2:NS=1:X=128 
:Y=96:K=0 

1670 IF GRID=1THEN A=USR0(1) ELSECLS 

1680 PUTSPR I TE0,(0, 209 ) ,CS,0: RETURN 

1690 IF GRID=1THEN 1710 

1700 LINE(18B,8+LA)-(252,41H^),1,BF 

1710 OOSUB1730:FORI=1TO5:KEY(I)ON:NEXT:C 

LOSE: RETURN 

1720 ' 

1730 IF GRID=1THENA=UBR0(0) 

1740 DRAW"s4a0":FORI=0TOK:DRAWD«(I):NEXT 

:RETURN 

1750 ' 

1760 FORI=lT05:KEY(I)OFF»NEXT:BEEP 
1770 SCREEN0 

1780 CLS:C0L0R15,4:WIDTH38:L=7 
1790 A=USRi(0):LOCATE10,l sPRINT"*** DR 
A W E R ***":LOCATE0,7 
1800 PRINTTAB(7)"Mostrar tela" 
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1810 PRINTTAB(7)"l_istar comandos" 


MG*="Gravando. . . " 


1820 PRINTTAB(7)"Gravar no formato BASIC 


2230 GOSUB780:LOCATE5,11:PRINT"*** Aguar 


II 


de! ";MG*;" ***":RETURN 


1830 PRINTTAB(7)"Gravar arquivo" 


2240 ' 


1840 PRINTTAB(7)"Ler arquivo" 


2250 LOCATES, 22:PRINT"<ESC> Retorna ao m 


1850 PRINTTAB(7)"Mostrar diretorio do di 


enu principal" 2LOCATE5,12:PRINT"Escala 


SCO" 


(=004) : " 


1860 PRINTTAB(7)"Voltar ao modo de edica" 


2260 TN=3:CN=12:LA=255:LB=1:X*=" ":GOS 


o" 


UB2330 


1870 PRINTTAB(7)"Apagar o que foi feito" 


2270 IFS*=""THENS*="004":LOCATE24,12:PRI 


1880 PRINTTAB(7)"vbltar ao Basic" 


NTS* 


1890 LCCATE10,22:PRINT ,, Selecione com <RE 


2280 S=VAL(S*):L0CATE5,14:PRINT"Coordena 


TURN>" 


da (=0) : _" 


1900 A=STICK(0) 


2290 TN=1:CN=14:LA=3:LB=0:X$=" ":GOSUB23 


1910 IF A=1THENIR_=7THEN_=7ELSEL=L-1 


30 


1920 IF A=5THENIFL=15THENL=15ELSEL=L+1 


2300 IFS*=""THENS*="0":LaCATE24,14:PRINT 


1930 LCCATE5,L:PRHVrrOfR*(249):L0CATE5,L- 


S* 


lrPRINT" ":L0CATE5,L+i:PRINT" " 


2310 CO=VAL(S*): RETURN 


1940 A*=INKEY* 


2320 ' 


1950 IF A*OOF?*(13)THEN1900 


2330 S*="":L0CATE24,CN 


1960 BEEP 


2340 A*=INKEY$:IFA*=""THEN2340 


1970 ON L-6 GOSUB 2000,2040,2100,2490,27 


2350 G=ASC(A*):BEEP 


50,2950,3140,3170,3240 


2360 IF (G<48 OR G>57) AND G<>13 AM) GO 


1980 GOTO1780 


8 AND G<>27 THEN2340 


1990 ' 


2370 IF G=27THEJVFETURN 1780 


2000 CLS:MQ*="mostrar":NO*="Mostrar tela 


2380 IF G=8 AND S*=" "THEN2330 


":IF D*(0)=""THEN GOSUB3260 


2390 IF 6=8 "n-ENS*=LEFT*(S*,LEN(S*)-l):L 


2010 COLDR15,1,C:SCREEN2:GGSUB1730 


0CATE24,CN:PRINTS*"_" ; :GOTO2340 


2020 GOSUB800:RETURN1770 


2400 IF G=13 AND S*=""THENRETURN 


2030 ' 


2410 IF G=13 THEN2460 


2040 NO*="Listar Comandos" :MG*=" listar": 


2420 IF LEN(S$)=TN TFEN2340 


GOSUB3260 : GOSUB2250 


2430 S*=S*+A* 


2050 IF FC=0 TFENGOSUB 20 


2440 L0CAIb23-H_EN(S*),CN:PRINTA*; 


2060 GOSUB780:LCCATE5,11:PRINT"*** Prepa 


2450 GOTO2340 


re a impressora ***" 


2460 IF VAL(S*)<LB ORVAL ( S* ) >LA ORLEN(S* 


2070 GOSUB830:N*="lpt:" 


)<>TN THEM_OCATE24,CN:PRINTX*:GOTO2330 


2080 MG*="Imprimindo...":GOSUB2230:GOSUB 


2470 RETLRN 


3300:RETURN 


2480 ' 


2090 ' 


2490 NO*="Gravar arquivo" :MG*="gravar":G 


2100 NO*="GravacSo formato BASIC" :MG*="g 


OSUB3260 : GOSUB2880 


ravar" :GOSUB3260 


2500 IF A*="D"Tl-ENNO«=".DRW"R SFNO*="" 


2110 GOSUB2880 


2510 MG*="arquivo ":GOSUB2970 


2120 IFA1^"D"THEhN0*^".BAS"ELSEN0*="" 


2520 IF P*0"A:"THEN MG*="gravacao":GOSU 


2130 MB*="programa":GOSUB2970:GOSUB2250 


B2210:GOTO2560 


2140 IF FC=0THENBOSUB20 


2530 GOSUB2220 


2150 IF P*<>"A:"7VEN MG*="gravaca o ":G0SU 


2540 XL=1:GOSUB2650 


B2210:GOTO2190 


2550 IFA^"N"THENGOSUB780:TN=8:GOTO2510 


2160 GOSUB2220 


2560 OPEN N* FOROLfTPUTASttl 


2170 XL=1:GOSUB2650 


2570 IF FLAG=1THEN GX=X:GY=Y ELSEGX=X1:G 


2180 IFA$="N"ThBVJGOSUB780:TN=8:GOTO2130 


Y=Y1 


2190 GOSUB3300: RETURN 


2580 PRINT#i,GX,GY,C,K 


2200 ' 


2590 FORI=0TOK 


2210 GOSUB780:LCCATE0,11:PRINT"*** Prepa 


2600 T=INSTR(D*(I),","):X*=D*(I) 


re gravador para ";MG*;" ***":GOSUB830 


2610 IF T>0THEN MID*(X«,T,i)="*" 


2220 IF L=llTHENMG*="Carregando. . . "R RF 


2620 PRINT#1,X*:NEXT 
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2630 CLOSE :GOSUB3370: RETURN 

2640 

2650 OPEN N* FORAPPENDAStti 

2660 IF LOF(l)>iTHENCLOSE:GOTO26e0 

2670 CLOSE: RETURN 

2680 GOSUB780:A=USRi(0) 

2690 L0CATE3,li:PRINT"*** Atencjao! Arqui 

vo ja existe. *** n :LOCATE 3,13:PRINT"0s 

dados anteriores serao perdidos." :BEEP:L 

0CATE3,16:PRINT"CcDnfirma gravagao (S/N) 

?"; 

2700 A*=INKEY* 

2710 IFA^' , S"THENBEEP:GOSUB2230:RETURN 

2720 IFA*="N""n-ENBEEP: RETURN 

2730 QOTO2700 

2740 

2750 CLS:LOCATEi0,i:PRINT"*** Ler arquiv 



o ***":MG$="arquivo " :GOSUB2880 

2760 IF A^ , 'D''^>E^^CI*=''.DRW' , ELSENO*= , ' ,, 

2770 GOSUB2970:XL=0 

2780 IF P*<>"A:"THENMG«="leitura":SOSUB2 

210:GOTO2800 

2790 GOSUB2220 

2800 OPEN N* F0RINPUTAS*1 

2810 INPUT#l,BX f GY f C,K 

2820 FQRI=0TOK 

2830 IM 3 UT#i,X*:T=INSTR(X$,"*") 

2840 IF T>0THEN MID*(X*,T,1)=" ," 

2850 D*(I)=X*:IVEXT:CLOSE 

2860 FLAG=0:X1=GX:Y1=GY:X=128:Y=96:NS=1: 

FC=0 : GR I D=0 : CS= 1 5 : GOSUB3370 : RETURN 

2870 ' 

2880 L0CATE5,22:PRINT"<ESC> Retorna ao m 

enu principal":L0CATE5,8:PRINfT"(D)isco o 
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• Jogos e oplic. p/2.0 




• Jogos Megarom 


• Capos, cobos, porto-disketes 


• Disketes51/4'e3,5" 
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li (F)ita: "; 
2890 A*=INPUT*(i):BEEP 
2900 IFA*=CHR*(13)TI-ENA*="D" 
2910 IFA*="D"THEhnT\t=8:P*= ,, A:":PRINT"Disc 
o": RETURN 

2920 IFA*="F"THENTN=6:P*="CAS:":PRIIVJT' , Fi 
ta": RETURN 

2930 IFA*=CHR*(27)THEN RETURN1780 ELSE G 
OTO2B90 
2940 ' 

2950 CLS:LOCATE5,0:PRINT"*** Diret6rio 
do disco ***":LOCATE0,3:FILES"A:":PRINT: 
PRINT :PRINT"Bytes livres : ";DSKF(0)*102 
4:PRINT:PRINT:GOSUB790:RETURN 
2960 ' 

2970 L0CATE5,22:PRINT"<ESC> Retorna ao m 
enu principal" 

2980 LOCATE5,10:PRINT"Nome do ";MG*;" : 
";STRING*(TN,95) ;N0* 
2990 N*="" 

3000 A*=INKEY*:IFA*=""THEN3000 
3010 G=ASC(A*) 

3020 IF (G<48 OR G>57) AND (G<65 OR G>90 
) AND G<>13 AND GOB AND G<>27 AND G<>45 
THEN3000 
3030 BEEP 

3040 IFG=27 THEN RETURN1780 
3050 IFG=8 AND N*= ,, "THEN2980 
3060 IFG=8 THEMM*=LEFT*(N*,LEN(N$)-1):L0 
CATE24,10:PRINTN*+"_"; :GOTO3000 
3070 IFG=13 f=NDN*=""THEN3000 
3080 IFG=13 THEN N*=P«+N*+NO«: RETURN 
3090 IF LEN(N*)=TN THEN3000 
3100 N*=N$+A* 

3110 LOCATE23+LEN(N*),10:PRINTA*; 
3120 GOTO3000 
3130 ' 

3140 C0L0RC,1,C:SCREEN2 

3150 GOSUB1730:FORI=1TO5:KEY(I)ON:NEXT:F 
C=0:RETURN330 
3160 ' 

3170 NO$="Apagar tudo":MG*="apagar" :GOSU 
B3260 

3180 A=USR1(0) 

3190 LOCATE2,10:PRINT"Confirma ? (S/N) " 
;:A*=ir»FUT$(l):BEEP 
3200 IF A*="N"THENRETURN 

3210 IF A*="S"THEN ERASE D*:DIMD*(22) :FL 
AG=2:X=128:Y=96:C=4:K=0:GRID=0:NS=1:CS=1 
5:RETURN 
3220 GOTO3190 
3230 ' 

3240 SCREEN0,0,1:COLOR15,1,1:WIDTH40:A=U 
SR2(0) :KEYON:POKE&HFCAB,0:END 
3250 ' 



3260 CLS:NO*="*** "+N0*+" ***" :NL=LEN(NO 

* ) /2 : LOCATE19-M_ , 1 : PR INTNO* 

3270 IF D*(0)O""THEN RETURN 

3280 MG*="*** Nao ha nada para "+MG*+" * 

**":ISL=LEN(MG*)/2:L0CATE 19-N_,10:PRINTM 

G$ : GOSUB790 : RETURN1 780 

3290 ' 

3300 a^ENNtFOROUTPUTAS*! 

3310 PRINTttl, "49997 ' "}STRING*(14,61) 

3320 PRINT#1, "49998 ' DRAW BY DRAWER" 

3330 PRINT#1 , "49999 ' "; STRING* (14, 61) 

3340 LI! =50000 !:L*=STR*(LI!):L*=RIGHT*(L 

*,LEN(L*)-1) 

3350 Q*=STR*(S):S*="s"+RIGHT*(Q$,LEN(Q*) 

-1) :V*=STR*(CO) :W$="a"+RIGHT*(V*,LEN(V«) 

-1):PRINT#1,L*;" DRAW ";CHR*(34) ;S$;W*;C 

HR*(34):LI!=LI'.+10 

3360 FORI=0TOV:L*=STR*(LI ! ) :L*=RIGHT4(L* 

,LEN(L*)-1):PRINT#1,L*;" DRAW ";CHR*<34) 

;M*( I ) ;CHR$(34) :LI !=LI ! +10: NEXT: CLOSE 

3370 GOSUB780:LOCATE0,11:PRINT"*** Opera 

cat) executada com sucesso ***" :GOSUB790: 

RETURN 

3380 ' 

3390 CLS:KEYOFF:COLOR15,1,1:SCREEN2,0,0 

3400 FORI=1TO10:KEYI,"":NEXT 

3410 DIM D*(20),M*(9):POKE&HFCAB,1 

3420 X=128:Y=96:C=4:K=0:CT=0:CS=15 

3430 FLAG=2:GRID=0:NS=1:EX=0:FC=0 

3440 FORI=8MX300TO&HD030:READA*:POKEI,VA 

L("&H"+A*):r<EXT 

3450 DEFUSR0=«M)000:DEFUSR1=&H156:DEFUSR 

2=&H3E 

3460 FORI=lTOB:READA$:B*=B*+CHR*(VAL("&H 

"+A*) ) :NEXT:SPRITE$(0)=B* 

3470 B*="":F0RI=1T08:READA*:B*=B*+CHR«(V 

AL( "&H"+A*) ) :NEXT:SPRITE*( 1 )=B» 

3480 GOSUB3740:FORI=1TO5:KEY(I)ON:NEXT 

3490 COLORC,l,C:CLS:DRAW"s4a0c4":RETURN 

3500 ' 

3510 IFT£RR=50RERR=56THENE*="Sem Disk-Bas 

ic.":GOTO3610 

3520 IFERR=190RERR=69THElvE«="Erro de E/S 

": CLOSE :GOTO3610 

3530 IFERR=53ANDXL=1THENXL=0:RESUME2670 

3540 IFERR=53THENE*="Arquivo inexistente 

.":GOTO3610 

3550 IFERR=66THENE*="Disco cheio. " :G0T03 

610 

3560 IFERR=67THENE*="Diret6rio cheio. ":G 

OTO3610 

3570 IFERR=68THENE*="Disco protegido.":G 

OTO3610 

3580 IFT£RR=70THENE*="Verifique disco. ":G 
OTO3610 
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3590 IFERR=99THENE*="Muito complexo. " :G0 
TO3610 

3600 SCREEN0:COLOR15,4:E*="Erro de Proce 

ssamento" 

3610 a.S:LCX^TEB,l:PRINT"*** Attn; 

U o ***":X*="":BEEP 

3620 E*="*** "+E*+" ***":NL=LEN(E*)/2 

3630 LOCATE19-M_,ll:PRINTE*:L0CATE5,22:P 

RINT'Tecle <RETURN> para cantinuar." 

3640 A=USR1(0) 

3650 A*=INKEY* 

3660 IFA*OCHR*(13)THEN 3650 

3670 BEEP: RESUME 1780 

36B0 ' 

3690 F0RI=1T03:KEY(I)QFF:NEXT 

3700 IF EX=0THENCOLOR,,C:FORI=1TO5:KEY(I 

) ON: NEXT: RETURN 

3710 COLOR,, 15: BEEP 

3720 FORI =1TO20:NEXT: COLOR,, 1:6OTO3690 
3730 ' 

3740 CCLOR15,1,1:SCREEN2,,0:OPEN"GRP:"FO 

ROUTPUTASttl 

3750 B*="u5rl2frfd3glgnll2brl0" 



3760 X*="u5rl4fdgll4rl2f3brl0" 

3770 A*="e2nrlle3r5f4brl0nu5r2ur2ur2ur2d 

r2dr2dr2u5brl0nrl5d3nrl0d3rl5brl0" 

3790 COLOR4:DRAW"c456a0":FORI=lTO4:PSET( 

30+1 ,68+1): DRAW B*+X*+A*+X*:NEXT:DRAW"bm 

31 , 69c 1 " +B*+X*+A*+X* 

3790 C0L0R8:F0RI=1T02:PSET( 112+1, 45) :PRI 

NT#1,"M S X":NEXT:C0L0R2:A*="Sistema Edi 

tor":FORI=lTOLEN(A*) :PRESET(95+( I-l)*6,8 

0) :PRINT#1,MID*(A*, I ,1 ) :NEXT 

3900 CCL0R8:PSET(25,183):PRINT#l,"Tecle 

<ESPACO> para comecar" 

3810 IF NOTSTRIG(0)THEN 3910 

3820 CLOSE: BEEP :CLS: RETURN 

3930 DATA 21,00,00,06,09,0E,0E,11 

3940 DATA 00,20,E5,3E,00,CD,CD,07 

3950 DATA 19, 79, CD, CD, 07, 10, 05, CD 

3860 DATA 2C,D0,06,08,E1,23,7D,FE 

3970 DATA FF,20,03,CD,2C,D0,7C,FE 

3980 DATA 18,20,DF,C9,79,EE,01 ,4F,C9 

3890 DATA FE,FC,F8,FC,FE,DF,8E,04 

3900 DATA FE,84,99,84,A2,D1,9A,04 



Homologacao 
DENTEL 0290/88 




Compativel 
MSX 
IBM-PC 
CP500 



INSTALE UM TELEX EM SEU MICRO ! 




homologado pela S.E.I 



TLX - 500 A EV0LUCA0 
NA AUT0MACA0 DE ESCRITORIOS 




."") | ' 



«! ft ss J 



m*t* 



Nosso Sistema possui: 

- Discaaem automatica; 

- Fichario dos indicativos mais utilizados; 

- Editor de textos prtiprio; 

- Ativacao e desativagao automatica; 

- Funcionamento com a Rede Nacional de 
Telex, reparte ou ponto a ponto; 

- Compatibilidade com as linhas IBM-PC e MSX; 

- Homologagao na Embratel. 



5513=!!! 



DATA INDUSTRIAL S/A 

Rua Coelho Neto 

s/n 1 ? Rua a esquerda da Portaria daCST 
Sao Diogo - Serra - ES CEP 29.160 
Tel.: (027) 228-4691 
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SCREEN IV 

ProjetO 



SERGIO DURIC CALHEIROS 



Apos ter preparado um ambiente de Irobalho, diga 
mos, mais esperto, passaremos o contar, a partir de 
agora, com novos comandos incorporados ao BASIC 
do SCREEN IV. Estes novos comandos permitem ex- 
plorer um pouco mais a fundo os recursos que o SCREEN IV 
oferece em seu modo de tela exclusive 

Como jd devem saber, em face da divulgacao previa de toda 
a programacdo do projeto, os novos comandos a serem im- 
plementados nesla parte serao: os CLS ON e OFF conjugados 
ao WIDTH, o comando OVER e, em fim, o comando FILL. A 
desotivocdo automdtica do SCREEN IV tombem serd implemen 
tada, conjugada ao comando CALL SYSTEM. Alem disso, o CLS 
normal passara a luncionar como deve, retirando a obrigo<;oo 
do usu6rio de usar o comando PRINT CHR$ (12) como seu subs 
tituto. Nada impede, porem, que o PRINT seja usado no lugor 
do CLS. nao sendo necessdrio, portanto, a substituicdo de 
PRINT'S jd existentes pelo CLS. 

Na epoca da odopto<;6o do WIDTH para comportar as 64 
colunas, comentamos que este comando serio complementado 
mais tarde com os comandos CLS ON e OFF. Com estes tres 
comandos agindo em conjunto, ganharemos um controle moior 
sobre a tela do computador e facilidades na criocoo de jonelas 
e/ou menus, aproveitando ainda melhor, a juni;ao grdfico/tex 
to. 

Normalmente, quando utilizamos o comando VviDTH para al 
terar o numero de colunas da tela, um CLS e executado au 
tomaticamente, o que pode ser indesejdvel em algumos si- 
tuacoes. A menos que o valor pardmetro do comando seja 
igual ao numero de colunas atual, o CLS nao serd executado, 
quando, na realidade, nada e realmente executado. 

Com os comandos CLS ON e OFF, podemos habilitar e de 
sabilitar respectivamente a execucao automdtica do CLS, apos 
uma mudanca do numero de colunas da tela atraves do WIDTH. 
Com isso, a criacao de uma janela, ou melhor, de uma area de 
tela mais restrita, passa a ser mais automdtica e mais con- 
trolada. 

Por outro lado, o comando OVER completam outra carac- 
teristica do programa. No SCREEN IV, assim como nas telas de 
texto, quando um caracter e impresso numa posicdo da tela, o 
padroo do caracter antigo desaparece, como se o micro fimpas 
se aquela posicao e, em seguida, aparece o padroo correspon 
dente ao novo caracter. Devido a possibilidade da utilizocdo 
simultdnea de grdficos e texto, torna-se necessdria uma ins 
tru^oo que permita a impressdo de caracteres sem que haja 
apagamento do padrao antigo, preservando o shape existente 
naquela posicdo. Com o comando OVER, pode se inibir ou 
habilitar o apagamento total ou parcial do padrao antigo, seja 
qual for. A sobreposi<;ao do caracter e controlada pelo pard 
metro passado ao comando. Para sobrepor totalmente o pa 
drao existente, ou seja, sem limpeza, digite OVER 15 e, para 
realizar uma impressao com limpeza total da area do caracter, 
use o comando OVERO que e o modo normal de opera<;ao. 

Um uso avancado deste coWiando, requer om minimo de 
conhecimento em manipulaqao de numeros bindrios por parte 
do leitor. A faixa de variacao do pardmetro (ou arranjo) do 
comando OVER estd entre e 15. Para compor estes numeros, 
sao necessdrios pelo menos 4 digitos bindrios, ou bits, que e o 
numero exato de pontos necessdrios d composicdo de um 
caracter em 64 colunas. Um caracter nesta forma ocupa uma 
motriz de 4 x 8 pontos. Desta forma, sabendo controlar esses 
bits, teremos condicoes de controlar qual parte do padrao an 
terior vai ser preservada e qual nao. A exemplo do OVERO do 
OVER 15, observe que, em bindrio, sao representados por 
0000B e 1111B respectivamente. Com isso, podemos perceber 



que cada representa uma coluna de motriz a ser apagado an 
tes de imprimir o padrao do caracter pertencente aquela coluna. 
O mesmo acontece com cada 1 do numero, que indica que 
coluna serd preservada. 

Como exemplo adicional, experimente o comando OVER 9. 
O arranjo convertido paro bindrio, nos dd o numero 1 001 B. 
Com isso. observomos que apenas o interior do caracter serd 
apagado para dar ao novo que estd para ser impresso. Obser 
ve ainda que, o pardmetro do comondo OVER e um numero 
qualquer, como acontece com o comando COLOR por exemplo. 
Portanto, a visualizacao do formoto do numero lica a cargo do 
programador, bem como a escolha de como passord o dado ao 
comando. Para o BASIC, o comando OVER 15 tern o mesmis 
simo efeito do comando OVER &B1 11 1 , ou OVER SHOF. 

Como advertencia, evite utilizer o comando OVER no modo 
direto. Caso o comando seja utilizado com pardmetro diferente 
de zero, a tela ficard borrado pelo cursor, tornando a leitura do 
que for digitado dificil ou mesmo imposslvel. Para normalizar a 
situacdo, basta digitor OVER 0. Mesmo que nao seja possivel 
ler o que estd escrita na tela, o micro ainda continuard a re 
conhecer os comandos dados. 

Finalmente, temos o comando FILL, que e um comando 
semelhante ao cmindo PAINT jd existente no BASIC. S" n el "i 
taxee "ILI <STEF 'X,Y)<,COR>,praticamente a mes....j do 
PAINT. Sua principal vantagem em rela<;do ao PAINT e o ganho 
de velocidade, que e cerca de oito vezes superior. Outra carac 
teristica, e a possibilidade de encher uma drea da tela com 
uma determinada cor, sem se preocupar com a cor dos limites 
fisicos. Com isso, a construcao de telas grdficas passa a ser 
bem mais fdcil e rdpida, pois nao hd preocupocdo com a borda. 

Naturalmente, hd uma restricdo, ou melhor, um fato que jus 
tifica o ganho de velocidade. Este ganho e conseguido porque o 
comando nao perde tempo em verificar se a drea que ele estd 
preenchendo possui algum "buraco" por onde pode haver um 
escape. O comando apenas realiza a procure de espa<;o na ver 
lical, procurando expandir se lateralmente ote encontrar os 
limites. Assim que atingir o topo e o choo da figure, o comondo 
termina. Este "topo" ou "choo". pode ser um unico ponto que 
estejo na linho de exponsdo do comando. Com isso, antes de 
utilizar o comondo FILL, deve se estudar os melhores pontos 
poro localizar seu ponto de referenda. Paro conseguir o preen 
chimento total de uma figura irregular, poderd ser necessdrio 
o uso de dois ou mais comandos FILL corretamente localizados. 
Mesmo que de um pouco mois de trabalho ao programador, na 
maioria das vezes serd largamente compensador, tanto em ter 
mos de velocidade quanto eficiencia. Pora compreender 
melhor como localizar bem o ponto do FILL, estude os pro- 
gramas das listagens BASIC. 

A digitacdo dos blocos deve seguir a maneira a que o leitor jd 
esteja ocostumodo. Terminondo a digitacdo, leia o descri<;ao 
dos comandos ote certificor se que conhece o sintoxe, o fun 
<;do e principalmente as limitacoes dos comandos novos. Isto e 
importante porticularmente no caso dos comandos FILL e 
OVER, que requerem uma boo prdtica por parte do progro 
modor. Com isso, execute o programo, digite os programos 
exemplo e comece a explorer os novos comondos como melhor 
Ihe convier. 

Este novo conjunto de comandos somente estard disponlvel 
no ambiente gerado pelo SCREEN IV. Tudo que for digitodo, 
poderd ser visto otraves da listagem do programa em outros 
modos de tele. Se o progroma for executado em outros telas 
que nao seja o do SCREEN IV, estes novos comandos ndo serao 
reconhecidos. 
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NAO CORRA 
O RISCO DE 




T-— ssssBSBsr"- 



Na assinatura semeslral 

voce ganha urn nurnero atrasado 

de CPU a sua escolha. 

Despesasdecorreiopornossaconta. 



OBS.: Na assinatura anual 

acrescentarNCz$l50,ou 
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ASSINE CPU 

•„.„ rPi l Para tat, estou enviando 
assinatura da rev-sta .CPU. Pjjj J^ pa Agfen . 



ciaCopacabana) no valor de: 

D NCZ$ 1.800,00 
D NCzS 1.080,00 
D NCzS 540,00 



NOME 
ENDERECO 

BAIBBO . 

ESTADO 



Para assinatura anual 
Para assinatura semestral 
Para assinatura trimestral 





Vale aindo lembrar que eslo e a antepenultima parte do 
projeto SCREEN IV. Ap6s esla, reslam as paries de recuperacao 
de telas em fita cassete e da impressao de telas grdficas. 
Apesar de todo o projeto j6 estar totalmente pronto desde o 
inlcio. nao quer dlzer que seja definitivo. O sistema oferece a 
possibilidade de inclusoo de novos comandos alem daqueles jd 



implementados. Os leitores que possuirem alguma rotina ou 
comando que possa ser implementado ao BASIC atraves do 
SCREEN IV, e desejarem divulg6 los, escrevam para que pos- 
samos examind los. Daremos prioridade para os programas 
que julgarmos serem mais uteis aos demais leitores. Are a 
proximo. 



PROGRAAAA 1 

10 REM Testa comando OVER 

20 CLS:KEY OFF:WIDTH 64:0VER 

30 LINE (0,5)-(255,5) 

40 PRINT @ 10," Comando OVER " 

50 OVER 15 

60 PRINT @ 40," Comando OVER 15 " 

70 OVER 

80 PRINT @ 64,"Pressione 

uma tecla. . ." 
90 A$=INPUT$(1) 

PROGRAAAA 2 

10 REM Testa comando FILL 
20 CLS:KEY OFF:COLOR 15 
30 CIRCLE (127, 95), 90 
40 FILL (127, 95), 2 
50 FILL (255, 95), 3 
60 FILL (0,95), 3 
70 PRINT @ 0,"Pressione 
uma tecla. . . " 

80 A$=INPUT$(1) 

PROGRAAAA3 

10 REM Estabelece parada do FILL 

20 REM a partir do ponto de localizacao. 



30 REM 

40 REM Comando MAL local izado: 

50 KEY OFF:WIDTH 64 

60 LINE (0,0)-(255,191) 

70 FILL (127,0) 

80 PRINT @ 0,"Note o ponto de 

parada (127,95). 
90 PRITN @ 64,"Pressione 

uma tecla. . ." 
100 A$=INPUT$(1) 
110 REM 

120 REM Comando BEM local izado: 
130 CLS 

140 LINE (0,0)-(255,191) 
150 FILL (255,0) 
160 PRINT @ 0,"O ponto agora e 

(255,191). 
170 PRINT @ 64,"Pressione 

uma tecla. . . 
180 A$=INPUT$(1) 
190 CLS 
200 REM Exemplo explicito de parada 

do comando 
210 PSET (127,95) 
220 FILL (127, 140), 2 
230 PRINT @ 0,"Qualquer ponto na 

linha de expansao serve como 

criterio de parada! 



SOFTWARE 



JOGOS (Ultimos Lancamentos) 
APLICATIVOS (Controle de Estoque, 

Mala Direta. Controle Bancariol 
UTILITARIOS (Zapper, MSXTools. 

Wordstar, Calcstar...) 
COMPILADORES (Cobol, Fortran) 
UNGUAGENS (Turbo Pascal, C. Mumps,...) 
ETC. 



LIVROS PARA MSX 




Translormacao para 2.0MI 
(soit.it i" informapdes) 



MSXS5»*!SA 

.IfsKSaifH. 



.software- 



Todos nossos produtos possuem 
garantia de TROCA por 1 ano 



Solicite o inlormativo 
MSXMANIANEWS - gratis 



Catalogo Gratis 

Remetemos para todo 
o territ6rio nacional 



HARDWARE 



MSX MANIA FZP 



Drive 5 1/4 e 3 1/2 

Impressoras 

Monitores 

Interfaces 

Cartuchos 256 (Megsram Disk) 

Modems 

Placa 80 Colunas 

Adaptacao para Praxis 20 

(transforma maq. eletrica em impressora) 
Estabilizador de Voltagem 
Filtro de Linha 

Porta Disquete (10 unidadesj 
Arquivo para 100 Disquetes 
Fitas para Impressora 
Disquetes Virgens 
Fita K-7 
Etc. 
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CPU 74 



BLOCO 1 






56A7 7F 38 
56AF C3 C7 


30 0A DD 
16 3A E9 


21 5A 47 
F3 32 6F 


4120 11 C3 38 11 
4128 88 14 C3 67 


C3 27 14 C3 

15 C3 00 00 


56B7 38 22 7F 38 CD CE 16 Fl 
56BF DD 21 82 46 2A 7F 38 C9 
56C7 CD 7B 02 2A 7F 38 C9 3A 








56CF AF FC 


FE 02 28 


0A 2A 7F 


BLOCO 2 






56D7 38 DD 
56DF CD 20 


21 5A 47 C3 7B 02 
19 CD 70 18 CD 18 


4170 FD B8 FD C2 
4178 FD 70 FF 8£ 


FD DB FE 
FF 43 PI 


E5 
00 


56E7 17 2A 
56EF 28 08 
56F7 28 EC 


70 38 7D 
CD FB 17 
CD 7D 18 


E6 07 B4 
CD A5 18 
3A 6E 38 








56FF FE BF C8 CD 10 


18 CD A5 


BLOCO 3 






5707 18 C0 CD 18 17 
570F 7D E6 07 84 FE 


2A 70 38 
IE 20 EB 


5567 22 7F 38 11 


A0 02 D5 


FE 


5717 C9 CD 


El 17 CD 


9D 18 20 


556F 9F CA DA 15 


FE 46 CA 


45 


571F 0C CD 


22 18 CD 


El 17 CD 


5577 16 FE 4F CA 


91 15 FE 


CA 


5727 D7 17 


C3 46 18 


CD 66 17 


557F CA 06 16 FE 


5F CA 06 


16 


572F C2 4B 


17 3A 7D 


38 Al 79 


5587 00 00 00 00 


00 Dl C9 


56 


5737 28 09 CD 94 17 


CD CB 17 


558F 45 52 F5 11 


8E 15 23 06 


573F C3 DF 


18 CD 75 


17 CD D7 


5597 03 1A BE C2 


23 16 23 


13 


5747 17 C3 


46 18 37 


CB 10 CB 


559F 10 F7 2B DD 


21 55 47 


CD 


574F 19 30 


F9 B0 4F 


06 00 37 


55A7 7B 02 22 7F 


38 21 0F 


00 


5757 CB 18 CB 11 30 


F9 B0 2F 


55AF CD 84 02 30 


07 DD 21 


67 


575F B3 CD 


81 19 C3 


C7 18 4F 


55B7 40 CD 7B 02 


AF F6 F0 


B3 


5767 3A 7E 


38 Al C8 


3A 7D 38 


55BF 32 6A 38 CB 


23 CB 23 CB 


576F Al 06 00 79 59 


C9 06 00 


55C7 23 CB 23 AF 


F6 0F B3 


32 


5777 4F FE 


FF C8 CA 


8A 18 37 


55CF 6B 38 Fl DD 


21 82 46 


2A 


577F CB 10 


CB 19 30 


F9 CB 38 


55D7 7F 38 C9 3A A9 FD FE 


F7 


5787 4F B0 


FE FF CA 09 19 CD 


55DF 3E 9F 20 IB 


F7 00 66 46 


578F 81 19 C3 C7 18 


06 00 4F 


55E7 FE 95 28 43 


FE EB 28 


46 


5797 FE FF 


C8 FE 01 


CA 8A 18 


55EF CD C6 02 2A 


7F 38 23 


22 


579F 37 CB 


18 CB 11 


30 F9 CB 


55F7 7F 38 DD 21 


82 46 C9 


Dl 


57A7 20 4F 


B0 FE FF CA 09 19 


55FF C9 53 59 53 


54 45 4D 


F5 


57AF CD 81 


19 C3 C7 


18 22 70 


5607 DD 21 66 46 CD 7B 02 


11 


57B7 38 11 


00 20 19 


22 72 38 


560F 00 16 06 06 


1A BE 20 


0C 


57BF C9 22 


74 38 11 


00 20 19 


5617 13 23 10 F8 


CD 4E 02 


21 


57C7 22 76 


38 C9 A7 


2A 74 38 


56 IF C0 FF 36 C9 


2A 7F 38 


Fl 


57CF 11 08 


00 ED 52 


C3 C0 17 


5627 Dl 00 00 00 00 00 C9 


AF 


57D7 2A 74 


38 11 08 


00 19 C3 


562F 3D 32 4D 38 


18 04 AF 


32 


57DF C0 17 


2A 72 38 


22 76 38 


5637 4D 38 23 22 


7F 38 DD 


21 


57E7 2A 70 


38 22 74 


38 C9 2A 


563F 82 46 C9 49 


4C 4C F5 


11 


57EF 76 38 


22 72 38 


2A 74 38 


5647 42 16 23 06 


03 1A BE 


20 


57F7 22 70 


38 C9 2A 


70 38 2B 


564F D3 23 13 10 


F8 2B DD 


21 


57FF 7D E6 


07 FE 07 


C2 B5 17 


5657 66 46 CD 7B 


02 DD 21 


9C 


5807 11 F8 


00 A7 ED 


52 C3 B5 


565F 57 CD 7B 02 


DD 21 67 


40 


580F 17 2A 


70 38 23 


7D E6 07 


5667 E5 C5 43 ED 


43 6D 38 


21 


5817 A7 C2 


B5 17 11 


F8 00 19 


566F BF 00 CD 84 


02 DA C7 


16 


58 IF C3 B5 


17 2A 74 


38 7D E6 


5677 Dl 21 FF 00 


CD 84 02 


DA 


5827 F8 28 


12 CD 9D 


18 C2 75 


567F C7 16 El 2B 


DD 21 66 


46 


582F 17 3A 6F 38 4F 


CD 8A 18 


5687 CD 7B 02 28 


26 FE 2C 


DD 


5837 CD CB 


17 18 E6 


CD 9D 18 


568F 21 55 40 C2 


C7 16 DD 


21 


583F C2 75 


17 79 C3 


8A 18 2A 


5697 55 47 CD 7B 


02 22 7F 


38 


5847 74 38 


7D E6 F8 


FE F8 28 


569F 21 0F 00 CD 


84 02 7B 


2A 


584F 16 7D 


E6 F8 C8 


CD 9D 18 
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5857 C2 


94 


17 3A 


6F 


38 4F 


CD 


5907 


8A 


18 2A 76 


38 CD 


7B 19 


585F 8A 


18 


CD D7 


17 


18 E0 


CD 


590F 


E6 


F0 4F 3A 


6F 


38 


Bl C3 


5867 9D 


18 


C2 94 


17 


79 C3 


8A 


5917 


81 


19 00 CD 


81 


19 C3 Bl 


586F 18 


2A 


70 38 


22 


78 38 


2A 


591F 


18 


A7 3A 6E 


38 


11 


F8 00 


5877 72 


38 


22 7A 


38 


C9 2A 


78 


5927 


21 


00 00 47 


04 


7D 


A7 28 


587F 38 


22 


70 38 


2A 


7A 38 


22 


592F 


06 


E6 07 A7 


20 


01 


19 23 


5887 72 


38 


C9 CD 


C7 


18 2A 


74 


5937 


10 


F3 3A 6D 


38 


11 


08 m 


588F 38 


3E 


FF C3 


81 


19 2A 


70 


593F 


2B 


CB 3F CB 


3F 


CB 


3F 3C 


5897 38 


CD 


7B 19 


A7 


C9 2A 


74 


5947 


A7 


47 ED 52 


19 


10 


FD 3A 


589F 38 


CD 


7B 19 


A7 


C9 2A 


70 


594F 


6D 


38 E6 07 


CD 


B5 


17 3C 


58A7 38 


3A 


7C 38 


4F 


CD 7B 


19 


5957 


47 


11 FF 00 


0E 


01 


CB 09 


58AF Al 


C9 


2A 76 


38 


CD 7B 


19 


595F 


37 


CB 1A A7 


CB 


IB 


W F6 


58B7 CB 


27 


CB 27 


CB 


27 CB 


27 


5967 


CB 


22 ED 53 


7D 


38 


79 32 


58BF 4F 


3A 


8F 38 


B1 


C3 81 


19 


596F 


7C 


38 2A 70 


38 


CD 


7B 19 


58C7 2A 


76 


38 CD 


7B 


19 E6 


0F 


5977 


Al 


C8 Dl C9 


CD 


87 


19 DB 


58CF 47 


3A 


6F 38 


CB 


27 CB 


27 


597F 


98 C9 CD 92 


19 


D3 


98 C9 


58D7 CB 


27 


CB 27 


B0 


C3 81 


19 


5987 


7D 


F3 D3 99 


7C 


E6 


3F D3 


58DF 2A 


74 


38 7D 


E6 


F8 28 


18 


598F 


99 


FB C9 F5 


F3 


7D 


D3 99 


58E7 7D 


Rfi 


F8 FE 


Ffi 


C8 CD 


9D 


5997 


"/C 


E6 3F F6 


40 


D3 


99 Fl 


58EF 18 


C2 


75 17 


3A 


6F 38 4F 


599F 


FB 


C9 00 00 00 


00 


00 00 


58F7 CD 


8A 


18 CD 


CB 


17 18 


E0 














58FF CD 


9D 


18 C2 


75 


17 79 


C3 


Soma 


total :01CE31 








ualidade 
hternacional 



A qualidade internacional dos disquetes 
Nashua ja e fabricada aqui mesmo no Brasil. 

Nas tres variedades de maior uso na midia 
magnetica flexivel: Disquetes de 5 1 /4", 51/4" 
AltaDensidadee31/2". 
Todos com a exclusiva garantia ilimitada 
Nashua. 




Made in Brasil, 



Fabrica da Nashua no Distrito Industrial 
de Campo Grande - Rio de Janeiro - Brasil 

Dsquetes 



O disquete legal. 
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CLUBE DO LEITOR 
O CARTAO DO MSX 







MANIACOS DO MSX 

1 5% desconto na compra de jogos. 

20% desconto na compra de jogos especiais. 

10% desconto na compra de programas de autores 

nacionais. 

15% desconto na compra de aplicativos. 

CONECTOR IND. E COM. LTDA 

5% desconto na compra de kit de drive para MSX. 

CIBERTRON ELETRdNICA LTDA 

1 5% desconto na compra de software. 

YOUNGSOFT 

30% desconto nas compras de software. 

10% desconto na inscrigao no clube de usuarios. 

NEMESIS INFORMATICA LTDA 

10% desconto em seus produtos. 

RECURSOS DIGITAIS 

5% desconto na compra de perifericos. 

10% desconto na compra de softs de outras empresas. 

30% desconto na compra de softs da Redi Universoft. 

TACTO INFORMATICA COM. LTDA. 

10% desconto na compra de qualquer produto ou curso. 

PAULISOFT INFORMATICA LTDA 

10% desconto na compra de software, exceto 
promocao. 

DISCOVERY INFORMATICA 

10% desconto em seus produtos. 

EDITORA ALEPH 

15% desconto em suas publicagSes. 



REVOLUTION 

20% desconto nas compras de software. 

NEWSOFT 

10% desconto na compra dos jogos comuns. 

20% desconto nos jogos especiais. 

25% desconto nos aplicativos. 

30% desconto na compra de livros. 

5% desconto na compra de perifericos e suprimentos. 

THUNDERSOFT 

20% desconto em todos os seus produtos. 

NEWDATA 

5% desconto nos produtos de representagao/revenda. 
10% desconto nos seus produtos. 

ESPACIAL ELETRONICA 
20% desconto nos seus produtos. 

INFORTELLES 

15% desconto em geral. 

GAME OF TIME 

10% desconto em geral. 

SOFTMARK 

12% desconto nos seus produtos. 

SOFT DESIGNS 

1 5% desconto na compra de software e servigos. 

MSX INFORMATICA 

10% desconto em hardware. 

20% desconto em software da MSX INFORMATICA e ou 
10% desconto em software de outras EMPRESAS. 
10% desconto em assistencia tecnica e suprimentos. 



Se voce ainda nao tern urn cartao, 
faca logo a sua assinatura de CPU e receba o seu! 
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MSX DEBUG 

ProjetO 



Passada a avalanche de BYTES quer derrubamos sobre 
o leltor no ultima parte do projeto. agora nos ocu 
paremos em implementar um novo e (bem) simples 
comando ao MSXDEBUG. Este comando e o comando 
APPEND. Como o nome sugere, este comando se encarrega de 
APPENDar, ou melhor, de gravar um bloco de dados da me- 
mdria no final de um arquivo jd existente no disco. 

Mas afinal, poderiam perguntar, que utilidade teria um 
comando que junta um bloco de memdria com um arquivo? Tal- 
vez sua utilidade nao seja obvia no momento. mas assegu 
ramos que a horo de usor o APPEND surgird mais cedo ou mais 
tarde. 

O sistema operacional (DOS) do MSX, organiza os dados 
exatamenle da mesma maneira que o sistema operacional dos 
micros compativeis com o IBM PC, o que possibilita que os ar 
quivos de um possam ser manipulados pelo outro. Isto e ex- 
plicado pelo fato da organizacao I6gica de coda um ser a mes 
ma, o que quer dizer que o MSX herdou, alem das qualidades, 
suas deficiencies, 

A quantidade total de informacao que um disquete comum 
pode reter e bem maior que aquela que e oferecida para guar- 
dar os arquivos do usu6rio. Isto ocorre, porque parte do espaco 
total e reservado para dados fixos do disco, destinado para 
identificar parte fisicas como um setor ou uma trilha e, ainda, 
para identificar as partes logicas como clusters e arquivos. 

Alem de todo esse espaco. digamos. roubado do usu6rio, 
oinda existe um detaihe que poucos conhecem. Quando um ar- 
quivo novo e incluido no disco, hd a ocupocao de tantos cluster- 
s quantos foram necessdrios para armazend-lo. Da mesma 
maneira que um arquivo tern um tamanho fixo, o cluster, que e 
uma unidode Idgica, tambem tern. Isto quer dizer que. mesmo 
que o arquivo contenha apenas um unico BYTE, o sistema 
operacional sempre reservard o espaco minimo de um cluster 
paro armazend lo. Nos discos de dupla face, cada cluster con- 
tem dois setores de 512 bytees, ou seja, 1 Kbyte para cada clus 
ter no total. 

Mas o desperdlcio de espaco nao para ai. O prprio usudrio 
contribui para diminuir este espaco tao precioso por simples 
falta de controle ou mesmo de informacao ou de tecnicas para 
aproveitar ao mdximo o espaco disponivel. Jd que nao e pos 
sivel mudar o que j6 estd estabelecido pelo proprio hardware, 
podemos ao menos mudar o comportamento do usuario no 
momento da criacdo e armazenamento dos seus arquivos em 
disco. 

Tomemos um exemplo numerico, a fim de ilustrar este 
processo e de como e possivel economizar clusters sem ter que 
eliminar nossos programas. Voltando ao espaco oferecido ao 
usu6rio, vejamos quando sobra no total. Um disco de face 
dupla contem 40 trilhas por face que, por sua vez, contem 9 
setores por trilha, o que nos dd os 360 Kbytes jd conhecidos, 
Descontado o espaco destinado ao boot, fat e diretdrio, alem 
da cdpia do fat e do proprio DOS, nos sobram, digamos, uns 
350 Kbytes. 

Se dividirmos este espaco entre arquivos de 16 Kbytes, que e 
a media de um arquivo para o MSX, teriomos, teoricamente, 
cerca de 22 arquivos por disco. Entretando, na prdtica. nao e is 
to que acontece, pois parece que cada arquivo ocupa mais do 
que deveria ocupar. Isso se deve ao fato de que a maioria des- 
ses arquivos sao arquivos gerados pelo BASIC, principalmente 
se foram jogos. Como vimos em partes anteriores, o BASIC 
precisa de uma parte do arquivo, justamente para saber se o 
tal arquivo foi mesmo gerado por ele, alem dos enderecos de 
localizocao do bloco. Observem que um orquivo de 16 Kbytes 
ocupa exatamenle 16 clusters. Mas, se o tal arquivo foi real 
mente gerado pelo BASIC, serao necessdrios 17 clusters, um a 
mais para guardar o ocrescimo de 7 BYTES feito pelo BASIC, 
perceberam? 
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Observem ainda que, um jogo razodvel contem uns 32 Kby 
tes, que normalmente sao divididos em dois blocos de 16 Kby 
tes cada. Alem dos blocos em bindrio, tambem e necessdrio 
um pequeno programa em BASIC paro carregar os dois pri- 
meiros. Com isso, hd um desperdicio de pelo menos 3 clusters 
para cada jogo. Um para cada bloco bindrio e, no minimo, mais 
outro para o programa BASIC, se nao lor grande, 

Se pudessemos juntar vdrios blocos num so, estariamos, 
teoricamente, economizando um cluster para cada bloco. Ain- 
da, se pudessemos dispensar o programa BASIC de carrega 
mento, estariamos economizando mais outro cluster. Com isso, 
o trabalho de carregamento ficaria a cargo do DOS. o que daria 
um ar mais profissional ao micro, sem ter que passar pelo 
BASIC e sem necessidade de quebrar o programa em vdrias 
partes. 

Desta maneira, com uma media de 10 jogos completos por 
disco, acabariamos economizando cerca de 20 clusters, o que 
possibilitaria a inclusao de um novo arquivo de graca. Alem dis 
so, os discos possariam a ficar mais organizados, pois pode 
riamos guardar mais informacao e com menos arquivos 
aparecendo cada vez que listarmos um diretdrio. Muitas vezes, 
na prdtica, nem sempre poderernos economizar tantos clusters 
quantos forem os blocos, porque nem sempre serd possivel 
eliminar uma quantidade de dados suficiente para tal. 

A necessidade da divisao dos programas surgiu, porque o 
BASIC do MSX nao comporta um bloco de memdria maior que 
28 Kbytes de uma vez sd. Apesar do micro possuir 64 Kbytes de 
memdria RAM, os primeiros 32 Kbytes estdo em ROM, lugar on 
de estd o interpretodor BASIC. Outro fator que influiu nesta 
divisao, foi a nao disponibilidade de drive para o MSX, o que 
limitou, ou melhor, obrigou o programador a trabalhar no am 
biente do BASIC. Um exemplo cldssico deste processo, foi a 
adaplacao dos jogos contidos em cartucho para serem car- 
regados a partir do cassete. 

Com o advento dos drives, e consequentemente, do DOS, tor- 
nou se possivel explorar toda RAM de forma mais natural. Um 
aspecto do DOS e que. quando estd otivo, toda memdria de 64 
Kbytes estd habilitada, onde os programas com extensdo COM 
sao carregados diretamente, praticamente independentes do 
seu tamanho. 

Todo programa COM e carregado e executado a partir do en 
dereco 100H. Geralmente, os programas em cartucho carre 
gados pelo BASIC rodam na pdgina 1, cujo inicio estd no en 
dereco 4000H. Para fazer com que os programas carregados 
pelo DOS sejam posicionados corretamente em seus respec 
tivos lugares, serd necessdrio juntar ao bloco todo uma pe 
quena rotina que faca a transferencia e habilite ou nao o BIOS 
antes de sua execucdo. E por este motivo que nem sempre e 
possivel economizar tantos clusters quantos forem os blocos. 
Talvez nao seja vantagem converter programas que conte 
nham apenas um bloco sob o ponto de vista de economia, mas 
certamente compensard em termos de organizacao e pelo fato 
de nos livrarmos do BASIC. Alem e claro, do carregamento ser 
mais fdcil, prdtico e rdpido. 

O trabalho de unido dos blocos de um jogo nem sempre e 
tarefa simples. As vezes pode parecer impossivel realizor o 
trabalho. Entretanto, esteja certo que, por mais dividido que 
esteja um programa, sempre serd possivel faze lo. O comando 
APPEND serd o primeiro comando de uma serie de comandos 
que serac implementados co MSXDEBUG para facilitar a vida 
do usudrio nesta tarefa. 

Por enquanto, nao adianta usar o comando APPEND, pois 
muito mais e necessdrio para converter um programa para o 
tipo COM. Na realidade, o comando APPEND serd utilizado 
apenas em casos extremos, ou seja, naqueles cosos em que 
mesmo no MSXDEBUG nao houver espaco memdria suficiente 
pora unir todo o programa de uma sd vez. Quando isso ocorrer, 



o que e raro, teremos que recorrer oo espaco livre do disco. 

Antes de moslrarmos como utilizd-lo paro gerar trabalho 
util, teremos que nos fomiliarizar com as tecnicas utilizadas 
para divisdo dos arquivos, para depois uni-los, sabendo distirv 
guir que parte deve ser considerado como pertencente ao 
programa e que parte nao. Isto e particularmente importante 
porque, sabendo descartar dados e codigo inuteis, estaremos 
diminuindo o espaco ocupado pelo programa. 

A implementacao do comando deve ser imediata. Observem 
que este comando tambem e reloc6vel, mas procure colocalo 
em seu local original, mostrado no bloco 1. Somente paro fins 
de controle sobre nosso trabalho, o BYTE rnarcador do fim da 
tabela de comandos deverd ter se deslocado para o endereco 
4D1DH apos esta implementacao. A entrada do comando (ica 
no endereco 17C0H devendo ser detinido na tabela das cha 
madas que deve estar em 4C9CH. Naturalmente, estes en 
derecos deverao coincidir somente com o dos leitores que es 
tao seguindo o projeto a risca. Apos a digitaqao verifique a 
SOMA e aproveite paro mudor a versao do programa para 1 .6. 
Nao creio que este comando deve ser colocado na tabela das 
teclas de funcao, justamente pela freqiiencia de uso. 

O funcionamento pode ser verilicado com um simples teste. 
Primeiramente, preencha a pdgino 1 com o BYTE 55H. Solve 
uma parte desta area com o comando DSAVE, A seguir, preen- 
cha esta mesma 6rea com outro valor, digomos OAAH. Feito is 
so, use o comando APPEND para incluir esta dreo no fim do ar 
quivo previamente criodo. Sua sintaxe e a mesma do comando 



DSAVE. E importante saber que o comando nao cria arquivos 
no disco, mas apenas junta blocos em arquivos j6 existentes. 

No proximo numero implementaremos o comando SAVE 
COM encarregado de salvor os blocos \a unidos de uma so vez, 
j6 com a extensao COM e junto com o programa de transferen 
cio. Alem disso. veremos o processo de uniao dos blocos e iden 
tificocdo dos dreas imporfantes. Esteja certo que entendeu a 
filosofia da conversao de arquivos. Caso tenha alguma duvida, 
nao hesite em escrever. Ate 16. 

SERGIO DURIC CALHEIROS 
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Entre a grande variedade de tipos de 
logos para o MSX, os que mais nos 
atraem sao aqueles que exigem vdrios 
tipos de raciocinio. Dentre estes tipos de 
jogos, destacarlamos como um dos mais 
completes, o jogo CASTLE (fig. 1). Ora 
vejamos: ele tem um bom visual, em 
determinodos rwmentos (nao d constan 
te) exige precisao de movimentos, tem 
muitos obst6culos (100 solas), muitas 
surpresas (logicas de movimento va 
riado) e, principalmente, muito desafio 
de Idgica e, obviamente, de raciocinio. 

As duas versoes do jogo CASTLE (I e II) 
sao muito boas, sendo que o primeiro c 
bem mais simples. Too simples que 
necessitamos de quatro dias (somando 
os tempos que nos dedicamos o ele). 
para termind-lo e, para o segundo, 
levamos tres semanas. Que vergonha ! ' 

Este artigo e dedicado a voce, que, 
"por acaso", teve "alguma" dificuldode 
paro ultropassar "uma" ou "outra" das 
100 solas do jogo CASTLE II. mas noo se 
iluda ou pense que vamos tirar a graca 
do sua diversoo. Mesmo com os comen 
tdrios que faremos sobre que cominhos 
seguir e que objetivos conquistar, este 
jogo exigir6 de voce muita destreza de 
movimentos, raciocinio e paciencia 
Porem, se voce chegar a uma sola e nao 
conseguir ultrapassd la ap6s mais de 10 
tentativas ou mais de quatro horas, pelo 
menos. escreva imediatamente para a 
redacSo desta revisla solicitando a lorma 
de ultrapassar aquela sola e, se der tem 
po, no pr6ximo numero, voce terd a res 
posta e poderd acompanhar as dicas do 
prdximo artigo. 

REGRAS BASICAS 

Antes de mais nada, uma breve sin 
tese do objetivo geral do jogo, auxi- 
liado pelo desenho da figura 2, que mos- 
tro os tipos de personagens, premios, 
obstdculos e outros, que aparecerao no 
interior das solas. 

OBJETIVOS: PRJNCIPE — personogem 
principal que e guiado por voce. 
MAPA — permite voce acompanhar as 
solas por onde jd passou. 
CHAVES — permite abrir as PORTAS de 
mesmo cor. 




'ICURA I APRiSlNlA^AO 



PORTAS sao abertas com as CHAVES 
de mesma cor. 

BORBOLETAS — entregam uma CHAVE 
laranja. 

PRINCESA — a "obcessao" do PRJNCIPE. 
PRlMIOS: BARRAS DE OURO - ddo 800 
pontos. ANEIS — dao 400 pontos. 
CRUCIFIXOS — dao 200 pontos. POTES 
VERDES — dd uma vida extra. OXI 
GENIO — permite passar pela dgua. AR- 
CO-iRIS - quando o PRINCJPE passa por 
sua cortina. nenhum inimigo o afeta. 

AUXiLIOS: TIJOLINHO, BOLO, SACO. 
JARRAO, BARRIL - todos estes auxllios 
podem ser empurrados e/ou Iransportados 
para qualquer lugar, dependenHo da 
sua necessidade. Com excessao do 
BOLO, o PRINCJPE pode subir em qual 
quer um deles. 

TRANSPORTES: HORIZONTAL FLUTUAN 
TE — o PRINCIPE pode andar junto, 
sobre ele. 



VERTICAL COM PARAFUSO o PRIN 
CJPE nao pode atravessar o parafuso. 
VERTICAL COM HASTE — o PRINCJPE 
pode atravessar a sua haste. 
ONDINHA — quando parada, o PRIN 
CiPE a transpassa e o REIZINHO e des 
truido se estiver sobre ela. Quondo on- 
dulando, tanto o PRINCIPE quanto o 
REIZINHO, cominham por sobre ela. 
ESTEIRA — transporta o que estiver 
sobre ela. porem. o PRINCIPE pode ficor 
parado sobre ela se for mantida pres- 
sionada a direcao inverse d direcao ac 
movimento Ha ESTEIRA. 
GUINDASTE — o contra peso (a esquerdo) 
tem que ser empurrado para fazer a 
"cacomba" do GUINDASTE subir ou des- 
cer. Pode, inclusive, ser lirado deste 
lugar e servir como um degrou, tol como 
o TIJOLINHO. BARRIL etc... 

INIMIGOS: SOLDADO, RATAO. REIZI 
NHO, BRUXINHA - todos estes tem 
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FIGURA 2 PERSONAGtNS 

movimento cego ou seja: noo perse 
guem efetivamente. apenas alrapalhom 
o caminho do PRJNCIPE. O REIZINHO, 
em alguns casos, sallo (um pouquinho) 
para tentar pegar o PRINCIPE, quando 
esle passa por cima dele. FOGUINHO - 
esla bolinho de fogo persegue mesmo, 
mas se houver um obstdculo enlre ela e 
o PRINCIPE, ds vezes, ela esquece a 
perseguicao. 

PLANTINHA — ela dorme e acorda. Nao 
pode ser pisado nunca. Quando estd dor- 
mindo. ocupa menos espaco e facilila 
um salto por sobre ela. Pode ser des- 
truida se voce empurrar alguma coisa 
sobre ela. 

PERIGOS: ESPETOS - todos eles sao 
mortais. 

Voce tern que guiar o PRINCIPE para en- 
contrar e libertar umo PRINCESINHA 
para se casarem e serem felizes e etc.. 
Para tal, lerd de passar por todas as 100 
solas do castelo (algumas por vdrias 
vezes). Muitos destas salas tern pas- 
sagens livres para outras salas, mas, no 
maioria delas, eslas passagens estao 
fechados por PORTAS coloridas que, ob- 
viamente, exigem uma CHAVE de mes- 
mo cor para abri las. Existem passagens 
que sao so de ida e outras que sdo ar 
madilhas do tipo cair do 8° andar ate o 
3° andar e ter que refazer todo o ca- 
minho. 

Na figura 3. mostramos um mapa de 
todas as salas e suas interligacoes (pas 
sagens ou PORTAS). As letras e os 
numeros em torno do quadro vao per- 
mitir identificar coda sala para uma ou 
outra dica e etc... Dentro de cada sala 
colocamos um caracter de referenda 
quanto ao que existe nela e estes carac 
teres expressam o seguinte: 

* = IN'CIO 

P = PRECISAODEAAOVIMENTOS 
O = QUEBRA CABECA 
L = CHAVE LARANJA 



As salas mais calmas estao sem re 
ferencia. 

Em algumas salas existem armadilhas 
muito perigosas e em outras pyiMom 
quebra cabecas (muito bem boiados) 
que, em alguns casos, por mais rdpido 
que seia o seu racioclnio ou mesmo que 
contemos tudo que voce tern que fazer 
nela, voce deverd gastar uns 20 mi- 
nutos. Durante a nossa primeira ten- 
tativa, houveram salas nas quais neces- 
sitamos de uns 3 dias de tentativas ate 
ter aquele "estalo" e conseguir "motor a 
charada". 

Como nao conhecemos ninguem que 
tenha terminado este iogo num unico 
dio, aqui estd um recurso muito opor 



tunc O jogo permite que voce grave em 
fita cassete a situacao atual e, obvia- 
mente, continuar num outro momento 
Esta funcao pode, inclusive, trazer 
menos tristeza quando acontecem 
aquelas quedas ou (alias de luz ou se, 
no afa de conseguir ultrapassar uma 
determinada sala, voce conseguir 
acabar com as 256 vidas que estao dis- 
poniveis no inlcio do jogo. Sugerimos 
que, de tempos em tempos, grave a 
situacao atual do jogo. Isto, no minimo, 
servird para voce descansar a "cuca". 

Sempre que voce quiser salvor o jogo 
na fita, basta pressionar a tecla F4 e, 
para a leitura do jogo, que so pode ser 
feita durante a apresentacao do inlcio 
do jogo (fig. 1). primeiro reposicione a 
fita no inicio de uma gravacdo (que tern 
um apito continuo e longo como coroc 
leristica) e tecle F3. 

Muita atencao ao usar as teclas de fun 
cao, pois se voce teclar F2, o jogo e en 
cerrado. Se vocS teclar Fl, voce mota o 
PRJNCIPE. Como voce e quern guio (en- 
carna) o PRINCIPE, voce se suicida no 
jogo. O Fl e muito importante (apesar 
de se perder uma vida, pois, em alguns 
casos, voce pode entrar numa "sinuca" 
ou seja, fica preso num lugar que nao 
tern como sair e, nesses cosos, o jeito e 
suicidar-se, o que provoca a sua ressur 
rei<;do (se ainda liver vidas extras), na 
enlrada da mesma sala. E mais um 
detalhe: se, por acaso, voce liver des 
Iruido alguma coisa naquela sala e 
chegar a conclusdo que nao deveria ter 
destruido, suicidando se, o que foi des- 
truido reaparece no seu lugar de ori- 
gem. Mas, lembre se, isto sd e vdlido en 
quanto voce nao sair da mesma sala e 
somenle se sua morte ocorrer por inler- 
medio da tecla Fl. 

A tecla F5 paralisa o jogo (pausa) ate 
qualquer outra tecla ser pressionada. 
Mantendo-se pressionada a tecla CTRL 
(control), a velocidode dos movimentos 
e aumentada e com as teclas CTRL 
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FIGURA 3 - MAPA GFRAL 
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e SHIFT pressionados simultaneamente 
a velocidade aumenta mais ainda. A 
musiquinha do iogo silencia quando se 
pressiona CAPS. 

Movimenta se o PRiNCIPE pora a 
direita ou para a esquerda (joystick ou 
teclas de direcao), para sallar (botao de 
tiro on bai ra de espaco) e para baixo e 
s6 "deixar coir". 

Um dos segredos do iogo est6 em 
saber usar corretamente o movimento 
de sallo ou sobido. Dependendo do lem 
po que voce mantiver pressionada a bar 
ra de espaco ou o botao de tiro, o PRIN 
CIPE alcanca alturas dilerentes, pode 
permanecer no alto por um certo limite 
de tempo que pode ser diminuldo com o 
ato de soltar a tecla ou o botao de tiro, e 
pode ser direcionado simultaneamente 
durante a subida ou no descida, o que, 
as ve7es, e fundamental para se con 
seguir certas posicoes. 

O JOGO 

Nesto primeira parte do artigo, vamos 
comentar dicas para voce alcancar a 
sala E9 no porta de baixo sem muitas 
dores de cabeca, mesmo porque, ate ai, 
existe muito pouco perigo e quebra 
cabecas, e creio que ate os menores de 
"60 anos" chegarao 16 tranquilamente e 
se aventurarao por outras solas. 

Voce tern que ter sempre em mente 
que: todas as CHAVES serao necess6rias 
e que os PREMIOS contom pontos e dao 
vidas. 

O primeiro objetivo do jogo e con 
seguir o MAPA do castelo e, para isto, 
vamos mostrar toda a sequenced de 
movimentos necess6rios, tendo como 
orientacoo o mopa ampliado, no tigura 
4, dos cinco solas envolvidas neste ob 
jetivo, 

Iniciado o jogo na sale A7, faco o 
seguinte: 
1 — Pegue a CHAVE omarela. 
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FIGURA 4 

2 — Aguarde o SOLDADO chegor na 
PORTA A7a. 

3 — Siga pora a direita, abrindo a POR 
TA e posteriormente andando atr6s do 
SOLDADO. 

4 — No momento em que o SOLDADO 
der meia volta, salte o e subo para o 
piso de cima indo em direcao a PORTA 
amarela. 

5 — Pegue a CHAVE amarela com 
cuidado para nao esborrar nos ESPETOS 
do teto. 

6 — Posse pela PORTA A7d e aparecer6 
a sala B7. 

7 Salte a talho do piso ate chegar do 
outro lado do falha. 

8 — Suba no TIJOLINHO e salte para 
pegar a CHAVE amarela. 

9 — Empurre o TIJOLINHO para a es 
querda ate que ele fique com uma 
metode fora do piso. Se ele coir sem des 
truir o RATAO, retorne a sala A7 e 
novamente volte a sala B7 pois, com is 
to, o TIJOLINHO voltor6 para o seu lugar 
de origem. 

10 — Meca a altura do piso onde es!6 o 
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TIJOLINHO ate o piso de baixo. Depois, 
meca esta mesma distdncia do ponto on 
de cair6 o TIJOLINHO, para a direita e 
aguarde o RATAO chegar ai, vindo da 
direira para a esquerda e, entao... em 
purre o TIJOLINHO e "adeus RATAO". 
11— Saia pela PORTA B7b e retorne 6 
sola B7 para que o TIJOLINHO volte pora 
o seu lugar de origem para dor pas 
sagem. 

12 — Saia pela PORTA B7e e oparecera 
a sala C7. 

13 — Pegue a CHAVE azul claro e saia 
pelo PORTA C7a retornando a sala B7. 

14 — Suba ao piso de cima e empurre o 
tijolinho para perto da falha do piso. 

15 — Suba no TIJOLINHO e salte para o 
piso do TRANSPORTE VERTICAL. 

16 — Aguarde o momento certo, suba 
no TRANSPORTE VERTICAL e saia pelo 
SAIDA B7c e aparecer6 a sala B6. 

17 — Desca rapidamente do TRANSPOR- 
TE VERTICAL e abra a PORTA B6f. 

18 — Empurre o JARRAO para a direita 
(apenas dois passos), de tal forma que 
fique um espaco do tamanho do corpo 
do PRiNCIPE entre o JARRAO e o pa 
rede. 

19 — Salte pora cima, pegue a POTE VER 
DE (uma vida extra), dirija o PRiNCIPE 
para a direita, posicionando-o sobre o 
JARRAO com metade do seu corpo para 
fora do JARRAO, a direita. 

20 — Ouando a BRUXINHA da direita 
chegar no extremo esquerdo do seu 
piso, salte para aquele piso, e, logo que 
chegar no chao daquele piso, salte 
novamente para pegar as duas CHAVES 
amarelas, deixe o PRINCIPE cair junto 6 
parede e, imediatamente, solte de novo 
indo em direcao 6 esquerda e, quando 
alcancar o final do piso desta BRUXI 
NHA, deixe o PRiNCIPE cair entre o JAR 
RAO e a.parede. 

21 — Empurre o JARRAO para a esquer 
da e suba nela para auxilia lo a subir no 
piso da BRUXINHA da esquerda. 

22 - Quondo a BRUXINHA da esquerda 
chegar no extremo direito do seu piso, 
salte para aquele piso e, logo que 
chegar ao chao daquele piso, solte 
novamente para sair pela PORTA B6a e 
aparecer6 a sola A6. 

23 — Salte paro o piso do TIJOLINHO e 
trote de destruir o REIZINHO do piso 
imediatamente abaixo, quando ele es 



fiver "passeando" no canto esquerdo. 

24 — Salle para o piso onde estava o 
"recem-falecido" REIZINHO, aguarde a 
ONDINHA parar de ondular e, enlao, 
caia nela indo been pela direita e saia 
pela saida A6e e aparecera a sola A7. 

25 — Pegue o MAPA enquanto salta o 
SOLDADO. a CHAVE verde. a CHAVE 
amarela e, saltando o outro SOLDADO, 
saia desla sola pela ex PORTA A7d e 
aparecera a saia B7. 

26 — Saia pela porta B7a e aparecera a 
saia A7 novamente tendo se, entao, 
como unica alternativa, "cair" na saida 
A7f. 

Viu s6 como foi fdcil??? Bern, agora, 
seu novo objetivo e colecionar cinco 
CHAVES verdes para poder pegar uma 
determinada CHAVE azul escura e, para 
tal, a seguir, damos a sequencia de 
solas que voce deverd percorrer para 
conseguir este segundo objetivo. Agora, 
voce terd de escolher por qual das POR 
TAS ir para uma prdximo saia, o que e 
como fazer em cado uma delas. 



l a SEQUENCIA PARA 

CONSEGUIR 
A 1° CHAVE LARANJA 

A8 - B8 - C8 - B8 - A8 - B8 - C8 - C7 - B7 
B6 — C6 - D6 — D7 — E7 - 07 - D8 - E8 - D8 — 07 - E7 
— 07 — D8 — E8 — E7 — D7 - D8 — E8 — 08 — D7 — E7 — 

D7-D8-D9-C9-D9-E9-D9-D8-C8-D8-D7 
-C7-B7-A7-A8-A9-B9-C9-D9-E9 



OBS.: Sugerimos que, antes de sair da 
sola, grave na (ita a situacao atual, E 
muito f (be i I voce se enganar de saida e 
ndo poder mais voltar ou nao ter mais 
1 chaves para as outras portas ou, sim 
plesmente, se perder. 




FIGURA 6 SAtA I 7 RtSOL VIDA 

DICAS ESPECIAIS 

• Saia A8 Destrua o RATAO empurran 
do o SACO que estd no piso de cima 
sobre ele e engane o FOGUINHO. 

• Sola A9 — Antes de pegar o OXIGE- 
NIO, treine como sair o mais rdpido pos 
sivel das ESTEIRAS, pois seu tempo e 
limitado. 

• Sola B8 - Empurrando o BARRIL no 
SOLDADO. ele e destruido e, destrua o 
REIZINHO, imprensando o na parede com 
o auxilio do SACO que estd no piso de 
baixo. 

• Sola B9 — Primeiro pegue a CHAVE da 
esquerda. 




FIGURA 7 - SAIA ffl RESOt VIDA 



• Sola C6 Num salto, caia no ESTEIRA 
e, noutro, pegue a CHAVE enquanto o 
TIJOLINHO passa por baixo do PRiNCIPE 
e use a folha do teto do piso do RATAO 
para se esconder dele quando ele es 
liver vindo da direita para a esquerda. 

• Saia C9 — Destrua o SACO que estd no 
piso de cima (vejo figura 5 da saia resol 
vida). 

• Saia D7 - Caia sobre os TRANSPOR 
TES FLUTUANTES e caminhe normolmen 
te (na mesma direcdo). 

• Sola D8 Olho na mira. Destrua o 
SOLDADO do primeiro piso e, depois. 
use os JARROES como degraus para al 
cancar as PORTAS. 

• Saia D9 — Atraia os REIZINHOS para a 
ONDINHA e destrua todos eles. 

• Sola E7 — Destrua todos os SACOS e 
BARRI5 (veja figure 6 da sola resolvida). 

• Saia E8 — Muita velocidade, raciocinio 
e exatidao (veja figura 7 da sola resol 
vida). 

• Saia E9 Cuidado, os FOGUINHOS 
sao "fogo". 



Apds a ultima parte do artigo, quando 
daremos as dicas para voce conseguir 
liberlar o PRINCESINHA, se voce nos des 
crever o que acontece quando a PRIN 
CESINHA e libertada (como e a tela que 
aparecerd) junto com as "senhas" de coda 
artigo e uma palavra chave escondida 
nos revistas dos artigos, voce receberd, 
com exclusividade, num diskete (ndo 
serao impressos na revista), os pro- 
gramas que foram usados para se ex 
trair cada um destes desenhos que sao 
operados pelo jogo como SCREEN1 e 
foram Iransformados em SCREEN2 para 
poderem ser impressos. A senha desle 
artigo e a palavra persisteneia. Cole- 
cione as revistas, pois as palavras 
chaves necessdrias sd serao reveladas 
na edi<;ao da ultima parte do artigo. 
Boa sorte e ate o mes que vem. 
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